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The author, Melbourne-born Tim Hartnell, 
first met Dick Smith in London in the late 
seventies while Dick was on a trip to buy the 
helicopter which he used for his record- 
breaking world solo flight. 


The two kept in touch, and after Tim’s return from the UK at the end of 1982, Dick called 


him one day and asked him to come up to Sydney to see a new product which Dick Smith 
Electronics had developed. It was the VZ200, the forerunner of the VZ300. Tim was 
impressed with the machine and its potential, and rang the editor of Australian Personal 
Computer about it. The editor decided the launch of the VZ200 was sufficiently important 
to change, at the last minute, the proposed cover of the next issue of the magazine, and 
replace it with a photograph of the VZ200. Tim’s review of the computer was the lead story 
in that issue. 


Tim and a couple of authors who had worked with him previously on books published by 
Tim’s company, Interface Publications, then wrote three books on the VZ200, which were 
distributed exclusively through Dick Smith outlets. The feedback on those books was 
extremely positive, so it was decided that the VZ300 also deserved dedicated books, such as 
the one you are reading now. 


Tim Hartnell originally left Australia in the middle of 1977 for the UK for what was planned 
to be a six month’s working holiday. He finally stayed for nearly six years, and while in 
London founded his company, Interface Publications, which now has offices in London, 
Melbourne and New York. Tim has written fifty or so books (he says he doesn’t know the 
exact number), predominately on computers and related subjects, and they have been 
translated into eleven languages. 


Although he now makes his home in Melbourne, he travels back to the USA and the UK two . 


or three times each year to keep in touch with developments in the computer field. “It gets 
harder to leave each time,” he said recently. “Australia is really the only country I ever want 
to live in. And with developments like the VZ300, it makes sense professionally, as well as 


personally.” 
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Forword 


You've just bought a great computer. Тһе 
VZ300 was a wise buy. It shows just how far 
computers have come since the old giant 
mainframes were first developed. _ 
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If you've never programmed a computer before 
this, and you'd Like to be able to program 
the VZ300 in just a few hours, then this is 
the book for you. 


With the help of this book, you'Ll find out 
the most important words for programming the 
VZ300. Апа, once you've worked through the 
book, you'll have a Library of interesting 
programs to keep you, and your computer, 
occupied for weeks to come. 


Tim Hartnell 9 
Melbourne, 1986 xi 





Chapter One — Getting Started 


Don't worry if the VZ300 is the very first 
computer you have ever owned. We're going to 
take things slowly, and in small steps, so 
you should have no trouble in keeping up 
with me. 


READ THE BOOK WITH YOUR VZ300 TURNED ON 


It is vital that you have your VZ300 turned 
on at all times when reading this book (ог 
at Least the first time you work through 
it). This is an ‘action book' and, unlike a 
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novel, it is not designed simply to be read. 
This book is Like a book on how to drive. 
You could never Learn about changing gears, 
and how it feels to handle a car when 
crossing the Harbor Bridge, without actually 
going out and taking command of a vehicle. 


So it is with your VZ and this book. Try out 
each new command and function when 1% 165 
explained to you, experiment with the games 
and other programs, апа you'll find you're 
Learning to program without even trying. 


THE KEYBOARD 


The first thing we have to do in Learning to 
use the VZ300 is to be able to use the 
keyboard. While not quite the same as a 
typewriter keyboard, it is not too far 
removed from it, апа should present’ few 
problems. 


The keyboard looks a little daunting when 
first seen, but you'll discover that you 
will feel quite confident about using it 
after only a few hours. 


Ме' 11 now Look at the major functions of the 


keyboard step by step. 

THE CONTROL KEY 

The most important key on the VZ300 15 the 
control key. It is located above the SHIFT 
key on the left hand side of the keyboard, 


e 
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and is marked CTRL. This key gives you 
access to the 'keywords' and 'functions' 
(which are written on the keys, above апа 
below the main Letter on each key). The CTRL 
key also controls the VZ's editing features. 


Holding down the control key, and pressing 
practically any other key, will give you the 
keyword written above the main Letter 
written on the key. 


You'll see that the word FUNCTION is written 
on the RETURN key, which is the wide key 
just below the red Light on the right hand 
side of the keyboard. If you hold down CTRL, 
and the RETURN key at the same time, you'll 
be able to access the functions written 
below the Letters on the keys. You can, of 
course, type out computer words such as 
PRINT "та: futt; if you. Like, Letter by 
Letter, instead of getting it in опе press 
from a key. 


When you press any key, without using the 
control key, then you'll get the main 
character on that key. As well, on most of 
the keys you'll see a square which is 
partially, ог completely, filled-in. These 
are graphic characters. 


KEYWORDS 


Keywords are important parts of programs. 
They are the sections of the program which 
actually tell the VZ300 what to do. The 
keywords are divided into two groups, 


3 
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commands and functions. 
commands first. 


Ме'!11 Look at the 


“~ 


3 


Іт — 
ИП 
iis 
| | 2 

if t 


| 





Many of the commands your VZ3DO obeys аге 
Like ordinary Aussie words. PRINT, for 


example, means just what it says, and tells 
the VZ300 to print something on your ТУ 
screen, 

Program Lines are numbered, as you can see 


if you Look at some of the program Listings 
in this book, and the command GOTO (followed 
by а number) tells the VZ300 - naturally 
enough - to GO TO that Line number. You'll 
be pleased to discover that you already know 
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a Large number of words used in the 
programming Language BASIC, which is the 
Language the VZ speaks. 


RUBOUT and INSERT 


These two keys - Located towards the right 
of the third row of keys (on the 'L' and ';' 


keys) - are part of the VZS300's editing 
system. INSERT makes room іп a program Line 
for а new character or keyword, and RUBOUT 


removes a part of a program Line which is no 
Longer wanted. 


INSERT works by placing a space between any 
two characters in a Line, so that you can 
Later type in new letters in that space. To 
use it, you just move the cursor (that black 
rectangle you сап see on the screen) over 
the character which is where you want to 
place your new material, and press the 
INSERT key, over and over again, while 
holding down CTRL key with your Left hand, 
until you have as many spaces as you need. 


To use the RUBOUT key, you must move the 
cursor to the beginning of the character or 
keyword you want to delete. Hold down CTRL 
апа RUBOUT, and the Line will disappear 
Leftward ‘under’ the cursor. 


To get to where you want to іп a program 
Listing on the screen, use the 'M', '«'!, ‘>! 
and the space bar, to move the cursor in the 
direction indicated by the arrows printed on 
the keys. 
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SHIFTING 


There is, 
than one 


as I'm sure you've noticed, more 
character on most of the Кеу5 on 
your VZ. The symbols in the top right hand 
corner of each of the keys are punctuation 
marks, and graphic or arithmetic symbols. 
You get these characters by holding down the 
SHIFT key and pressing the relevant key at 
the same time. 


FUNCTIONS 


Functions are the second group of keywords 


(counting the commands, which we've just 
Looked at, as the first group). The 
functions are, for the most part, written 
below the main Letter оп each key. 
Functions are the 'thinking keywords'. That 
is, they are often called upon to make 


decisions while a program is running. 


Here's а function in 


use: 


simple example of a 


10 PRINT RND(100);:GOTO 10 


If you typed this into your VZ, 
RETURN key afterwards, 
word RUN (ог get the word RUN by holding 
down the CTRL key and pressing the '6' key), 
and pressed the RETURN key again, you'd see 


pressed the 


numbers between 1 and 100 appear all over 
the screen. Press the BREAK key, in the top 
right hand corner of the keyboard, while 
6 


then typed in the 
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holding down the CTRL key, to stop the 
program running. 

THE CURSOR 

That flashing black rectangle which follows 


you as you type on the screen is called, as 
I pointed out а short time адо, the 
cursor. It has a number of uses. 

Because it can move to апу part оҒ the 
screen, it is very useful when you want to 
edit, or change, part of a program Listing. 
For example, if you wanted to change the 100 
in the one-Line program given earlier into a 
50, you would first move the cursor to the 
beginning of the number 100. You do this 
with the versatile CTRL key, using the arrow 
on the full stop key, until the cursor is at 
at the beginning of Line 10. Then, still 
keeping CTRL down, you press the comma key 
until you are over the 1 in 100. 


Keep it pressed. If you go past the 1, don't 
worry. Just use the "М! key until уои are 
Over it again. Still keeping the CTRL key 


down, press RUBOUT once. The number should 
now be 00. Type in 5, which will cover the 
first 0. Then, Let go of the CTRL key and 


press RETURN over and over again, until the 
cursor is below the program Line, апа you 
get the message: 


200Т OF DATA ERROR 


Now type іп RUN, and press the RETURN © key 








Programming the VZ300 


again, and 
appear on the screen. 


THE GRAPHICS MODES 


We'll 
here, 


touch on this subject 
then go into more detail 


only 
and 


briefly 
in a 


Later chapter. Your VZ300 can operate in two > 
The first one - MODE О - 16. 
using | 
- is a graphics | 


graphics modes. 
the standard display mode we've been 
to date. The second - MODE 1 
mode, in which you can use 
(called 'pixeLls' 
pictures. 


coloured dots 
in computer-talk) to create 


To see MODE 1 enter and run the 


next program: 


in action, 


10 REM MODE DEMONSTRATION 
20 MODE (1) 

30 COLOR RND(4),1 

40 X=0:Y=0 

50 FOR N-1 TO 55 

60 SET (X,Y) 

70 X2X44:YzY44 

80 NEXT N 

90 GOTO 30 


To get back to MODE 0, and 


press the BREAK key. 


hold down CTRL 


INVERSE 


The 

(J 

(that 
8 


INVERSE command, 
key, 
is, 


colon 
video 
back- 


Located on the 
is used to provide inverse 
Light writing on a dark 


numbers between 1 and 50 should 
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ground) for anything held within 
marks. (Note that your trusty VZ will 
accept keywords written in inverse.) 


quote 
not 


Suppose, for example, you wanted to have a 
Line Like the following in a program, апа 
you wanted to have the words within quote 


marks in inverse Letters: 
10 PRINT "THIS IS THE VZ300" 


You put your computer into inverse after the 


first quote mark by holding down the CTRL 
key and pressing the INVERSE (:) key, then 
type what you want. Follow the same 
procedure before you type in the second 


quote mark to turn the video back to normal. 
Keep practicing on the VZ300 until you're 
used to the keyboard. You'll discover that 
the more you use your VZ, the more you'll 
Learn about its abilities and capabilities. 
Don't be afraid to experiment. You can't 
damage the VZ just by typing in commands. 


Well, now that you're familiar with the 
keyboard, it's time to go to chapter two, 
and start Learning to use the VZ300 itself. 





First Steps 


Chapter Two — First Steps in Programming Until you press the RETURN key, the VZ300 

will do nothing. Specifically, at this 
Time now to take your first steps іп Point, it will ignore the command PRINT 2. 
programming. You'll be axtramely, рївавәа tome. р now; and you рен Ей ане” спа 
ses how simple und undemanding these тіге ооо, 2 CPPeer uncernesth. the duse Last 


: 2. This, pretty obviously, is the way PRINT 
Pepe wii он. works. It takes the information which 
follows the command PRINT, with а few 

exceptions which we will Learn about 


shortly, and PRINTs this on the screen. This 
is, after all, exactly what you would expect 


ees ж PAM TS EAM Bit to do. 
Mx а ENA, Cd But your VZ is not completely stupid. That 
Еа А MS RES зыл 2 is, it сап do more than just blindly print 
AN SEES «s . what you tell it to do. If the word PRINT is 
ventis Ns followed by а sum, it will work it out 
| | ЧЕ. Ооо before printing, and given you the answer. 
S 55 bo 35 pod SS 5552 A Try it now. Enter the following Line, then 


press RETURN: 


ө е өө. 
e e v» e 9 - СЧ ЧО e об ее 
еееесесееегсе 

о 0 ө ө өүөү 2, 
оогоо оо оо (б. теолог 
DOO, alm ee Эм о 9,%,9,9,0,6,%,0,6 d 
ан, ^9 . KF Peete 
сее 


= _ E 55 | PRINT 5 + 3 (You get + by 


427 МЭНГЕ TA REN 555 еш typing SHIFT ;) 





дана ава ioe ЗАСАКА tete eeu. | You should see the figure 8 appear. Тһе 
We'LL start learning to program the trusty VZ300 added 5 and 3 together, as instructed 
VZ300 by using the most commonly-used by the plus sign, then printed the result on 
command in BASIC, the keyword PRINT. the screen. 


rns eta terete So o 4" cee 0^0 4 0 o e 0 e 9 огото е O ө O GO е ө ө ө ө ө ө ө ө ө в ө OO OU е € O ө OO GO * тот ооо о ө 9, 9 "o "o * 
је, ао 9*7. "T. ө өө ө ө өө ө SSO SCS € ө ө O 0 э э O 0 0,9 O D O O O 9 0 O € € O * GO э э ә ө е ө © 9 0 ө ө ө ө, е о о е, 
еее t ө оа e 9 е o ооо 0 00 ө I) 


Type the following into your VZ: It can do subtraction as well (clever 
inventions, these Dick Smith computers). 
PRINT 2 (Note that you сап Type in the following, and press RETURN to 
either spell PRINT see subtraction (and PRINT) at work: 
in full, or use the 


2. CTRL key) PRINT 7 - 2 
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Now the VZ can, of course, carry out a wide 
range of mathematical tasks, many of them 
far more sophisticated that simple addition 
and subtraction. And it is pretty simple, as 
we've seen to tell the VZ what to do. 


It was not so simple in the early days of 
computers. In those days, the electronic 
brains did not understand English, or BASIC, 


and to program them, you had to talk to them 
in binary (all O's and 1's). If there was a 
mistake іп a program, a vast number of 1's 
and O's had to be checked. 


RR 
CQ cae 
BS: A 2272. зо 


Y) Y 


45 А 

29) oe y 

Swe REY 920); 
However, it is much ae E 


the VZ you wish to add, multiply, 
12 


Hr 
а 226 


DE 





COSE tell 
divide or 


First Steps 


subtract, and it -wiLl (бо it. for you 
virtually instantly. There is опе tiny 
hitch. When it comes to multiplication, the 
computer doesn't use the X symbol you 
probably used at school. Instead, it uses an 
asterisk (*) for multiplication, and a slash 


(/) for divide. 
MORE THAN ONE THING AT ONCE 


The VZ300 is not Limited to а single 
operation in а PRINT statement. You сап 
combine just about as many as you Like. Тгу 
the next one, which combines а multiplica- 
tion and a division. Type it in, then press 
RETURN to see the VZ work it out: 


PRINT 5*3/2 


This seems pretty simple. Just type in the 
word PRINT, follow it with the information 
you want the VZ to print, and that's all 
there is to it. 


But it is not quite as simple as that! Try 
the next one, and see what happens: 


PRINT TESTING 


That doesn't Look too good when you try it, 
does it? Instead of the word TESTING, we got 


a zero. That's because the VZ300 thought we 
wanted а 'variable', rather than the word 
TESTING. Now, I'm not going to try and 


explain the meaning of the word variable at 
this stage. We'll get to it Later. Briefly 
| 13 
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though, it means simply that the VZ thought 
you wanted to print a number which Пад the 
name of TESTING. 


Silly machine. Computers may Бе fairly 
clever, but most of the time they need to be 
Led by the hand, Like a very stupid human 
being (such as myself). Give a computer the 
right directions, and it will carry it out 
tirelessly and perfectly, without interven- 
tion from the human operator. 


But give them incorrect instructions, or — 
even worse - confuse them, and they give up 
in despair, ог do something quite alien to 
your intentions. 


STRINGS 


If you want the computer to print the word 
TESTING, you have to put quote, or speech, 
marks around it, Like this: 


PRINT "TESTING" 


This time when you press the RETURN key, the 
word TESTING will appear below the Line. 


Information held in this way between quote 
marks is called а most peculiar name іп 
computer circles. The jargon for the 
information enclosed in the quote marks 15 
'string'. So, in our example above, the word 
TESTING, when enclosed in quote marks, is a 
string. (You can, in fact, get away with 
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just the first pair of quote marks so the 
Line reads PRINT "TESTING but this is not 
good practice.) 


OUR FIRST PROGRAM 


Type the following into your VZ300. Notice 
that each Line starts with a number. Type 
the number into the computer, and follow 
this with the other material: 


40 PRINT "JACK AND JILL" 


Now press RETURN. You have just entered the 
first Line of your first program. 


Type in the next Line, the one starting with 
20, and press RETURN once you have 1% in 
place. Do the same with the rest of the 
Lines: 


20 PRINT "WENT UP THE HILL" 
30 PRINT "TO FETCH A PAIL" 
40 PRINT "OF WATER" 


When you RUN this (by typing in RUN, and 
then pressing the RETURN key), you should 
see the following: 


JACK AND JILL 
WENT UP THE HILL 
TO FETCH A PAIL 
OF WATER 


READY 
15 
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ADDING NEW LINES 


The VZ300, clever beast that it is, 
you to enter your lines іп any order you | 
choose. It will then sort them into the 


correct order for you. 





Although our first program, and many of the 
other ones in this book are numbered in 
10's, starting at 10, there is no particular 
reason why you should follow this convention 
if you do not want to do so. 


However, there is a good reason for Leaving 
'gaps' in the counting. Although our first 
program could easily be numbered in 1's, it 
would Leave no room to add Later Lines, 
we decided there was a need to do so. 
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To see that the VZ does automatically put 
its Lines in order, add the following: 

25 REM A LINE IN THE MIDDLE 
Now type in LIST and press RETURN. The word 
LIST tells the VZ to List out the current 
program it is holding. When it does so, 
you'll see Line 25 neatly in its numerical 


place. Now run the program again. You should 
find that Line 25 made no difference at all 
to it. 


MAKING REMARKS 


Why did the VZ decide to ignore Line 25? The 
word REM stands for REMARK, and is used 
within programs when you want to include 
information for a human being who is Looking 
through the program Listing. 


scattered 
book. In 


find REM statements 
throughout the programs in this 
each and every case, the computer ignores 
them. They are only there for your conven 
ience, for the convenience of the programmer 
or for anyone else who wants to read through 
the program Listing. 


You'll 


Often you'll use REM statements at the 
beginning of the program, such as the 
following: 
5 REM A JACK AND JILL POEM 
17 
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You may wonder why this should be necessary. 
After асс {it is pretty obvious that the 
computer is holding a 'Jack and Jill’ poem, 
even without the Line 5 REM statement. You 
are right. In this case, there is Little 
point in adding a title REM statement to the 


program. But have a Look at some of the 
more complicated programs a little further 
on іп this book. Without REM statements 


you'd have a pretty difficult time trying to 


work out what the program was supposed to 
do. 





It is worth getting into good programming 
habits early in your computer career, so I 
suggest that, right now, you decide to use 
REM statements in all your programs 
(assuming you have memory spare for them). 
18 
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BACK TO PRINT 


Let's return to the subject of the PRINT 
command. Empty your VZ's memory by typing in 
the word NEW and press RETURN. Туре the 
following program into the VZ300 and run it: 


10 PRINT 1,2 

20 PRINT 1;2;3 

30 PRINT "COMPUTER" 

40 PRINT "23434 =":23+34 

50 PRINT 2*3 

60 PRINT 3*5 

70 PRINT "THE ANSWER IS":23+5-7/6 


The funny Little upside-down 'v' in Line 60, 
by the way, is on the keyboard as a Little 
arrow. You get it from the ''N' key, 


Бу. 
holding down SHIFT while you press 'N'. 


When you run it, 
this on the screen: 


you'LL see something Like 


1 2 

1 8-3 

COMPUTER 

23+34 = 57 

6 

243 
THE ANSWER IS 26.8333 


READY 


Firstly, as in the JACK AND JILL program, 
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the VZ executes a program line by Line, 
Starting at the Lowest numbered опе and 
proceeding through the Line numbers in 


order, until it runs out of numbers, when it 
stops. Programs tend to run from the Lowest 
Line number up to the highest. 


OO 





You'tL 


discover 


that this orderly prog- 
ression of Line numbers does not always 
apply, as there are ways of making the VZ 
execute parts of a program out of strict 


numerical order, but for the time being it 
is best to assume that the program will be 
executed in order. | 


20 
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Look first at Line 10 of the program. You 
can see that there is a comma between the 1 
and the 2. This has the effect of making the 
computer print the numbers with a wide space 
between them. The comma can be used in this 
way to space numbers out neatly for a table 
of results or for similar purposes. (Try 
PRINT 1,,2 and see what effect this has.) 


to divide 
the things which follow a PRINT statement 
(but not when the comma is part of a string, 
that is, is between quote marks), you'll 
find it divides the screen ир into neat 
Little columns. Try PRINT 1,2,3,4,5,6,7,8,9 
and see the result of the commas. Then you 
can try PRINT 1,,,,2,,,,3,,,,4 to make it 
perfectly clear what is going on. 


Line 20 has three numbers (1, 2 and 3) 
separated not by commas (as in Line 10) but 
by semicolons (;). Instead of separating the 
output of the numbers as the comma did, 
you'll see that it causes them to be printed 
with a single space on each side of them. 
When printed, numbers are always followed by 
a space. Positive numbers are also preceded 
by a space. 


Line 30 is a word, and this is a .... If 

you mentally said 'string' when you came to 

those dots, then you're learning well. This 

word is a string, in computer terms, because 

it is enclosed within quote marks. 

Line 40 For the first 
21 
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time we have included numbers and a 
(=) within a string. As you can see, 
prints exactly what is within the 
marks, but works out the result of the cal- 
culation for the material outside the 
quotes, giving - in this case - the result 
of adding 23 to 24. 


symbol 
the VZ 


Keep in mind that the МУ7300 considers 
everything within quote marks as words, even 
if the material within the quotes is 
numbers, symbols, or even just spaces, or 
any combination of them, while it counts 
everything which is not within quotes in a 
PRINT statement as a number. 


This is why the VZ made a mistake earlier 
when ме told it to print the word TESTING 
without putting the word in quotes. It 
Looked for а number which was called 
TESTING, and because it could not find one 
(ав we had not previously told the computer 
to Let TESTING equal some number), it 


unable to cooperate. 


So Line 40 treats the 
marks, as a string, 
the Line, outside 
numerical information 


first part, with quote 


the quote 
to process. 


In Line 50 we see the asterisk (*) used to 


represent multiplication, and the  VZS3DO 
quite reasonably works out what 2 times 3 is 
and prints the answer of 6. In Line 60, ме 
come across a new and strange sign, ^. This 


ee 


quote 


string exactly as 


as 


and the second part of 
marks, as 
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means 
print 


'raise to the power', so Line 60 says 
the result of 3 raised to the fifth 
power. In ordinary arithmetic, we indicate 
this by putting the 5 up in the air beside 
the three. However, it is pretty difficult 
for a computer to print a number halfway up 
the mast of another number, so we use the ^ 
symbol to remind us (by pointing upward) 
that it really means ''print the second 
number up in the air'. 


The final Line of this program combines а 
string (' THE ANSWER IS') with number inform- 


ation (23+5-7/6). You can see that, as 
expected, the computer works out the sum 
before printing the answer, апа prints the 


it appears in the original 
Look closely at the end of the 
After the closing quote, there is a 
which, as we Learned in Line 20, 


program. 
string. 
semicolon 


joins various elements of a PRINT statement 
together. This semicolon means that the 
result of the calculation is printed up next 


to the end of the string. 


This brings us to the end of the second 
chapter of the book. I'm sure you'll be 
pleased at how much you've Learned so far, 
and are Looking forward to continuing your 
Learning. But, now you've earned a break. So 
take that break, апа then come back to the 
book to tackle the third chapter. 
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Chapter Three — Ringing the Changes 


It's all very well putting things onto 
VZ's screen as we Learned to do 
chapter, but from time to time 
discover we need to be able to get 


the 


in the Last 
you'll 
printed 


material off the screen during a program, to 


make way for more PRINT statements. We do 
this with a command called CLS, for CLear 
the Screen. 
CLEAR THAT SCREEN 
Enter the following program into your  VZ300 
and run it: 

10 PRINT "TESTING" 

20 INPUT A$ 

30 CLS 
When you гип the program, you'll see the · 
word '‘'TESTING' appear under RUN, more ог 
Less as you'd expect. However, below it. 
you'll see a question mark. Where did that | 


come from? 


in a program which the VZ comes to the word 
INPUT, means the computer is waiting for you 
to enter something else into it, or just to 
press RETURN. 


You'll recall those string things we talked 

about a while ago, and how they were 

anything which was enclosed within quote 
24 


The question mark is known as an 
input prompt. An input prompt, which appears 


merce к= 


=——— 


— 
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marks. Well, in Line 20 above, the computer 
was waiting for a string input. We know this 
by the dollar sign which follows the A which 
follows the word INPUT. If there was по 
dollar sign, the VZ would want you to enter 
a number. If there is a dollar sign, it 
wants a string, or for you just to press the 





RETURN key. It doesn't matter which one you 
enter. The VZ will be happy either way. 


(remember, 
computer is 
25 
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expecting 
either enter word, spaces, graphics charact- 
ers, numbers, 
tion of them. Опсе you've typed іп 
words or whatever, you need to press RETURN 
so that the VZ will know you've 
entering your material. 


Anyway, when you respond to the input prompt 


just by pressing RETURN - rather than enter 
а мога, and then press RETURN - you'LL see 
the screen clears and the word TESTING 
disappears. Where did it go? We pointed 


out that the VZ works through a program in 


Line order. Firstly the program printed 
TESTING on the screen with Line 10 and then 
progressed to Line 20, 
an input (ог for you to press RETURN). 
you had done this, 
Line 30, where it found CLS and obeyed that 
instruction. The instruction was to clear 
the screen, so the VZ300 did just that, and 
the screen cleared. 


Run the program a few times, until 
got a pretty good idea of what is happening 
and you've mentally followed through the 
sequence of steps the VZ is carrying out. 


you've 


DOING IT AUTOMATICALLY 


Instead of waiting for you to press the 
RETURN key, you can write a program which 
clears the screen automatically, as our next 


tiny program demonstrates. Enter this 
program into your VZ, type in RUN and then 
o6 


a string to be entered, you сап. 


punctuation, or any combina- | 
your | 


finished | 





where it waited for 
Once |. 
the VZ moved along to | 
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RETURN, and sit back for the Amazing 
Flashing Word demonstration. Note that, to 
make it easy to read what is in a program 
Line, you should put spaces between such 
words as FOR and TO. 


10 REM AUTO-CLEAR 

20 CLS 

30 PRINT 6 234," AUTOTESTING" 
40 FOR D-1 TO 600 

50 NEXT D 

60 CLS 

70 FOR D-1 TO 600 

80 NEXT D 

90 GOTO 30 


Run this program, and you'll see the word 
AUTOTESTING flashing off and on іп the 
middLe of the screen. 


What is happening here? 


We' LL Look at the program, and go through it 
Line by Line. Firstly, as you know, Line 10 
is a REM statement which Labels the program, 
but which is ignored by the VZ300. Then, 
Line 20 clears the screen to get rid of the 
program Listing. 


30 prints the word AUTOTESTING in the 
Next, the VZ comes to 


Line 
middle of the screen. 


Line 40, where it meets the word FOR. We'll 
be Learning about FOR/NEXT Loops [ав they 
are called) in detail in a Later chapter, 
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but all you need to know here is that the 
computer used FOR/NEXT Loops for counting. 
In this program, Lines 40 and 50 (the FOR is 


in Line 40, the NEXT in Line 50) to tell the 


VZ to pause for a while and count from 1 to 
600 before moving on. AS you can see, it 
does this counting pretty quickly. 


So, idt waits for a moment 
from 1 to 600. Then, 


while counting 
it comes to Line 60, 


which is the command CLS, which tells the VZ | 


to clear the screen. The computer then 
encounters, in Lines 70 and 80, another FOR/ 
NEXT Loop, so waits a while as it counts 
from 1 to 600 again. 


Continuing on in the program, 
to Line ӨП which tells it - as is 
obvious - to go to Line 30, 
thing begins again. 

SEEING STARS 

The following program - STAR COLONY - also 


shows CLS in action, although it is 
more interesting than the AUTOTESTING one. 


STAR COLONY 
program LIFE, 
John Conway when he was attending 
University in the UK. 
simulate the birth, 
colony of cells. 


is based on the very 


growth and death of a 
As we are using asterisks 


to indicate cells, and as these Look vaguely | 


Like stars, I decided to call this variation 
of the program STAR COLONY. 
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Conway drew up the rules under which the 
stars in the colony evolve. You'll be 
pleasantly surprised to see just how 


effective these rules can be when applied, 
producing unexpectedly delightful designs. 





The rules, which are applied by checking the 
stars surrounding each position on the 
Screen, one by one. As a result of these 
checks, decisions are made as to whether or 
not there will be a star in that position 
the next time the colony is reprinted. -If 
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you imagine that а particular star is | 
sitting on a chess board, somewhere near the . 
centre of the board, уои! 11 see that it has 
eight squares surrounding it. If, when the 
contents of the eight surrounding squares 
are counted, two or three stars are found | 
and there is a star on the square which 15 
surrounded by the other eight, this star. 


will survive until the next generation. 


If there are three stars surrounding the 
square being checked, and the central square | 
is empty, а star will be 'born' іп that | 
square in the following generation. If] 
there are four or more surrounding stars, 
then the central star will die before һе | 


next generation is printed. 


The rules are applied all over the screen at | 
once, and once the full 'galaxy' has been | 
assessed, the next galaxy generation 1s | 


printed. 


Here is the program Listing: 


20 CLS:PRINT "PLEASE STAND BY" 
30 COLOR 2,1 
50 DIM А(12,12) 
60 DIM В(12,12) 
70 6-1 
80 FOR X-2 TO 11 
90 FOR Y-2 TO 44 
110 IF RND(O)>.4 THEN A(X,Y)=1 
120 B(X,Y]-A(X,Y] 
130 NEXT Y 
440 NEXT X:CLS 
56 150 60508 330 








160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
390 
400 
410 
420 


450 
460 
470 
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б=б+1 

FOR X=2 TO 11 

FOR Y=2 TO 11 

C-0 

IF А(Х-1,Ү-11-4 THEN C=C+1 

IF A(X-1,Y]-1 THEN C-C44 

IF А(Х-1,Ү+1)=1 THEN C=C+1 

IF А(Х,Ү-1)=1 THEN C-C44 

IF А(Х,Ү+1)=1 THEN С=С+1 

IF А(Х4,Ү-11-4 THEN С=С+1 

IF A(X+1,Y)=1 THEN C=C+1 

IF A(X«1,Y41]-4 THEN С=С+1 

IF А(Х,Ү)-1 AND C<>3 AND C<>2 THEN B(X,Y)-0 
IF А(Х,Ү|-0 AND С=З THEN B(X,Y]-1 
NEXT Y 

NEXT X 

GOTO 150 

PRINT 641,"GENERATION"G 

SOUND RND(25),2 

PRINT:PRINT " "; 

FOR X=2 ТО 11 

FOR Y=2 ТО 11 

A(X, Y] -B(X, Y) 

IF А(Х,Ү)-4 THEN PRINT "* "; ELSE PRINT " "; 
NEXT Y 

PRINT:PRINT " "s 

NEXT X 

RETURN 
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And here are some 'colonies' 


it: 


GENERATION 1 


E uz ш E EE 
x E = * 
E * ш t E 
* E ш as ш 
Ба ЕН ж E ш x 
E * ж 
& Ф * 

ЕЧ 5 uz 

ЕЗ z E * 


GENERATION 2 


= E * 
E ж 
ж 
ж ж E 
2 ES 
ж 
Ж x Во 
ЕЗ * ш 
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GENERATION 12 


+ = * 
жж ж Е 
2 
* 
z а 
© * > 
2 + ж 
+ = 
= 


GENERATION 13 


ш = БЕ 
ж uz 
* 
x 
* БА 
E * 
E zx * uz 
ES 
* 
* 


ш Ен п 
* ш ES 
E 
uz 
& * 
x ш x* ж 
ж ж * * 
x * 
ш 
ш 
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CHANGING PROGRAM LINES EASILY 


ж 


It is relatively easy to change Lines within. 
а typed program. ALL you have to do is use. 
the 'M' and CTRL keys to move the cursor о 
the required position, then type іп the 
desired changes. | 


If you have a Line 10 which read... 


10 REM AN EDIT TEST 


Кар м қ -амба жесі Rr x 


...апа you wanted it to read... 


10 REM AN EXCITING EDIT TEST 


ч а Уа а DAARIU RO Up Tu 


.»«.8ll you would need to do would be to 
move the cursor to the line, then use the: 
INSERT key (the 'L' key, while holding down 
the CTRL key) to make space for the word 
EXCITING (nine spaces) before typing it in. | 


After doing this, 


key again, and type in LIST (or use CTRL 5). 





and press RETURN again. This time, when the 
program is Listed, you'll see the new 
version of line 10 is included within the: 
program. | 
| 
If you only have а single Letter wrong 
within a Line, you simply move the cursor to. 
the error, and then type in the correct. 
Letter or Letters. These will automatically 
34 | 
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replace the incorrect material. If you want 


to wipe out an enter Line, just enter the 
Line number, and press RETURN. 

Now these instructions may seem а Little 
complex. However, they do not need to be 
mastered before you can continue your 
Learning. 

If you're not sure how a particular Line 


should be edited, and you can't be bothered 
Looking it up here or in your manual, just 
type in the whole Line again. When you press 
RETURN, the new Line will automatically take 
the place of the old one within the Listing. 


GETTING THE PROGRAM BACK 


If you want to see a complete listing after 
it has vanished, once a program has been 
run, all you need to do (as was mentioned 
briefly before) is type in the word LIST 
(ог use CTRL 5) then press the RETURN key. 


There 15 no reason, when using LIST, 
must List the whole of a program from the 
beginning. When you have longer programs, 
you may well want to List only part of them. 


why you 


You do this by use of the hyphen (-), as 
follows: 
LIST -100 This Lists up to, and 
including, Line 100 
LIST 50-90 This Lists Lines 50 to 
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LIST 150- This Lists the program 
from Line 150 to the 
end 

LIST 270 This Lists just Line 
270 


USING THE PRINTER 


You connect your printer to the VZ via the: 
PRINTER INTERFACE MODULE, which you plug in! 
the back of the computer in the PERIPHERAL 
APERTURE. Make sure you disconnect your 47. 
from the power before plugging in the! 
interface. ў 






PRINTER 


PERIPHERAL 
APERTURE 





PRINTER 
PLUG 
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As well, the printer should be disconnected 
from the power. Once you've removed the 
cover marked 'PERIPHERAL' from the back, 
plug the interface module in gently, but 
firmly. Once it is in place, turn on the VZ 
and make sure it is working as normal. If 
it is not, turn the power off, unplug the 
module, and start again, making sure you are 
ав gentle as possible when sliding it into 
place. 


Опсе the computer end is OK, plug the other. 


end of the cable into your printer, and turn 
on the printer. 


To test it, just type in the word COPY and 
press RETURN. 


Here are the commands the printer 
recognizes: 
LLIST to list the current program 


COPY to print out what is currently 
on the screen 


LPRINT used within a program when you 
want to print something on the 


printer, rather than on the 
Screen 


LLIST is very easy to remember, as it is 
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very similar to LIST, and has а similar 
function, except that it Lists to the 
printer rather than Listing to the screen. 


In the same way, LPRINT is easy to remember, 
does, 


as it does more or Less what PRINT 

except on paper rather than on the TV. 
that  LLIST can be used in the same мау 
LIST to get just parts of the Listing 

LLIST 40 - 70 is a valid command). 


3B 


г 
| 
3 
i 
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Chapter Four — Descent into Chaos 


It's time now to start developing some real 
programs. Үои!' 11 notice that from this point 


on in the book there are some Lengthy 
Listings. Many of them will contain words 
from the BASIC programming Language which 
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have not been explained. This is because, as 


the programs become more complex (апа (far 
more satisfying to run) it becomes more and 
more difficult to keep words - which ‘have 
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not been explained - out of those programs. 
However, this is not a major problem, апа 
you'll probably be able to work out what 


most of them mean, 
the context of a program Line. 


We are working methodically through the 
commands available on your VZ300, and in due 
course, all of the important ones will 
covered. Ав we continue up the Learning 
curve, you'll come across words іп a program 


which seem unfamiliar. When you find опе 
Like this, just type it in. Үои! 11 find that. 
you'll soon start picking up the meaning оғ! 


words which have not been explained, just Бу. 
seeing how they are used within the program. 


So, if you find a new word, don't worry. 


The 
knowing what the word is, 
the Listing after you've seen the 


running is Likely to Lead you to work 
what it means. 


RANDOM EVENTS 


In the world of nature, as opposed to 
manufactured world of man, 
appears to be at the heart of many 
The number of seagulls over the MCG at 
one time, 
in Hobart and may well rain again today, the 
number of trees growing in the Snowy 
Mountains, 


any 


Of course, 
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we can predict with some 
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program will work perfectly without you: 
and investigating! 
program; 
out 


the! 
randomness 
events, 


the fact that it rained yesterday! 


all appear to be somewhat random. 


degree 


just from seeing them іп. 
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of certainty whether or not it will 
but the success of our predictions 
to be somewhat random as well. 


rain, 
appears 


When you toss a coin in the air, whether it 
Lands heads or tails depends on chance. The 
same holds true when you throw а six-sided 
die down on the table. Whether it Lands with 


the one, the three or the six showing 
depends on random factors. 
Your VZ's ability to generate random number 


is very useful in order to get the computer 


to imitate the random events of the real 
world. The BASIC word RND Lies at the heart 
of using this means of generating random 
numbers. 

GENERATING RANDOM NUMBERS 

We'll start by using RND just as it is to 
create some random numbers. Enter the 


following program, and run it for a while: 


10 REM RANDOM DEMO 
20 PRINT RND(0); 


30 GOTO 20 
When you do this, you'll see a List of 
random numbers Like these appear on the 
screen: 
«9385231 „535947 .0496182 .11153 .514353 „987732 .254916 
„134856 .754681 9.96173E-03 .835601 .31631 .706701 .220855 
4195021 .0714185 .390616 .552147 .173092 .53583 «699251 
4997718 .279562 „398306 .435725 „805982 „295596 .708233 
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Ав you сап see, RND(0) creates 
randomly between zero and one. 
it running, 
forever, writing 
the screen. 


Now random numbers between zero and опе 


. бег TNT EE 24.26 
Mg К t 


Де 
2" „собою Ае, 





of limited interest if we want to get 
numbers to stand for something else. 
example, if we could generate 1's and 
randomly, we could call the 1's heads 
the 2's tails, 
'electronic 
produce 
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it will go on and on apparently: 
up new random numbers оп. 
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we could use the computer as ап imitation 


six-sided die. 


Fortunately, there is away to do this. 
Enter the next program and run it: 

10 REM DICE 

20 PRINT RND(6]; 

30 GOTO 20 
When you гип this program, you'll get а 


series of numbers, chosen at random between 


1 and 6, like these: 

BEES UO. 4-:8.-4- Б.-4-. 8.-2,..3..3..5 1-8 
Мо 8 1. 8B 5 4 в 4 4 5 5 3. 8..2 
EI 3 5 2? 4 Б 4 B 1 4 а 5 85 4 
HEU 39- 5-9 1-5 4 4 3 6 Бо 68 6 
END D 1 со OF 55 P 1 4 4 5- 8 B5 2 
EE л 1 3g 1 4 5 5. 4 3 8 5B 3 6 
2 B 1 6 & 5 1 6 1 4. 5 2 2 1 6 
Even though we could create vast series of 
numbers between 1 and 6 with а program Like 
this, it is not particularly interesting. 
And, if you ran the program over and over 
again, you'd find that the sequence of 
numbers was starting to look very familiar. 


The random numbers, as you'd discover if you 


ran the program a number of times, аге not 
really random at all. 

This is because the VZ does not really 
generate random numbers, but only looks as 


electronic 
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head, your VZ300 holds а Long, 
numbers, 
for random numbers. The List, 
for us, is so long, that 
impossible to see a pattern in 
15 running. 


it, once 


FAST FOOD CRAZINESS 


We'll Look now at a program which makes 
interesting use of the VZ's ability 
generate random numbers. As you can see, 
creates 
a fast food outlet, 


going to order. You decide you'll Let 


VZ's random number generator pick your food; 
for you. 
44 
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Long List of dust 
which it prints in order when asked! 
fortunately 
it is more or Less 
itf 
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type in this program, and what 


you're having for Lunch: 


See 


10 REM FAST FOOD 

20 CLS 

30 A=RND[ 4) 

40 PRINT "YOU'VE ORDERED "; 

50 IF А=1 THEN PRINT “A HAMBURGER" 
60 IF А-2 THEN PRINT "А THICKSHAKE" 
70 IF Az3 THEN PRINT "CHIPS" 

ВО ТЕ A=4 THEN PRINT "A HOT DOG" 

90 FOR D=1 TO 600:NEXT D 


100 PRINT 
110 GOTO 30 


When you run this, you'll get something Like 


the following on your screen: 


YOU'VE ORDERED A THICKSHAKE 


YOU'VE ORDERED A HOT DOG 


YOU'VE ORDERED A THICKSHAKE 


YOU'VE ORDERED A HAMBURGER 


YOU'VE ORDERED CHIPS 


When you Look back at the Listing, you'll 


- see how the program sets the letter A to the 


in. tine . 3D.. „Го 
the Letter A is standing for: a 


45 


of the random number 
case, 


value 
this 





Programming the VZ300 | | 









number. It is called a variable, or (because 
in this case it stands for a number) it is 
called a numeric variable. In computer 
jargon, we say that in Line 30, the VZ has 
assigned the value of the random number tc 
the variable A. 


Chapter Five — Looping the Loop 


In this chapter, I'LL be introducing a very 
useful part of your programming vocabulary - 
FOR/NEXT Loops. You'll recall that ме 


And, as you can see in Lines 50, 60, 70 and 
80, the value assigned to A determines which 
food order you place. | 





mentioned FOR/NEXT Loops when demonstrating 
the use of CLS to clear the screen. A FOR/ 
NEXT Loop was also used in our FAST FOOD 
program (Line 90) to add a delay. 


А FOR/NEXT Loop is pretty simple. It takes 
the form of two Lines in the program, ‘the 
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first of which is Like this: 
10 FOR А-1 TO 20 
With the second Line Like this: 


20 NEXT A 


the Letter after FOR. 
must be the same. (You can, іп 


The control variable, 
and after NEXT, 
fact, 
the VZ300 will know what you mean. 
Leaving the control variable out 
Programs harder to read and alter, 
practice 15 not recommended in your 
programming days.) 


so this 


As a FOR/NEXT Loop runs, the computer counts 
second, ас 


from the first number up to the 
the next program shows: 


10 FOR A=4 TO 20 
20 PRINT A; 
30 NEXT A 


When you run it, you'll see the numbers 1 to 


20 appear on the Screen, 
have expected. 


much as уои пау 


Now try this version: 


10 FOR A-7865 TO 775 
20 PRINT A; 
30 NEXT A 





Leave the second A out altogether, as 
However, | 
makes) ЕРУ. 


early 


Looping the Loop 


This is the result of running it: 


768 770 7 


774 


769 
775 


767 
778 


765 766 
74 772 


STEPPING OUT 

In the two previous examples, the computer 
has counted up in ones, but there ів no 
reason why it should always count іп this 
The word STEP can be used after the FOR 
part of the first Line as follows: 


10 FOR A-10 TO 400 STEP 40 
20 PRINT А; 


30 NEXT A 
When you run this program, you'll discover 
it counts (probably as you expected) іп 
steps of 10, producing this result: 

10 20 30 40 50 #60 70 80 

90 100 
STEPPING DOWN 
The STEP does not have to be positive. Your 
computer is just as happy counting 


backwards, using a negative STEP size: 
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10 FOR A-100 TO 10 STEP -10 
20 PRINT A; 
30 NEXT A 


This is what the program output Looks Like: 


100 90 80 70 60 50 40 30 
20 10 
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- MAKING A NEST 


- It is possible to place one or more FOR/NEXT 


Loops within each other. This is called 
nesting Loops. In the next program, the B 
Loop is nested within the A Loop: 


40 FOR A21 TO 3 

20 FOR B-1 TO ? 

30 PRINT A;"TIMES";B;"IS";A*B 
40 NEXT B 

50 NEXT A 


The nested program produces this result: . 


1 TIMES 1 IS 1 
4: TIMES 2 IS"? 
2 TIMES 4 IS 2 
2 TIMES 2 IS 4 
3 TIMES 1 IS 3 
3 TIMES 2 IS 6 


You need to be very careful to ensure that 


| the first loop which is started is the Last 


Loop which is finished. That is, if FOR A... 
first Loop you mentioned іп the 
program, the Last NEXT must be NEXT A. 


Try swapping Line 10 with Line 20 іп the 
program, and see what happens when you get 
your FORs and your NEXTs mixed up. P 
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You may recall that I mentioned you do 


in fact, have to mention the control 
variable with the NEXT if you do not want 


it. I also said that it was not Particularly 


good programming practice to Leave it out as 


it made programs somewhat difficult to! 
unravel. However, as I imagine you've 
realised by now, Leaving off the control, 
variables at least gets around the problem 
of wrongly Specifying the NEXT іп nested 
Loops. 

You can replace Lines 40 and 50 of the 
Program with either of the 


(removing the old Line 50 completely): 


40 NEXT B:NEXT A 
40 МЕХТ:МЕХТ 


40 NEXT B,A 


MULTIPLICATION TABLES 


You can use nested Loops to get the VZ to do 
such fascinating things as printing out 


ther. 
multiplication tables, from one times one! 
right up to twelve times twelve. Wow! 


the program you need: 
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10 FOR А=1 TO 12 
20 FOR B-1 TO 12 
30 PRINT A;"TIMES";B;"-";A*B 
40 NEXT B:NEXT А 


Here's part of the output of that program: 


7 TIMES 8 = 56 
7 TIMES 9 = 63 
7 TIMES 10 = 70 
7. TIMES. 41. = 77 
7 TIMES 12 = 84 
8 TIMES 1 = 8 

8 TIMES 2 = 16 
8 TIMES 3 = 24 
8 TIMES 4 = 32 
8 TIMES 5 = 40 
8 TIMES 6 = 48 
8 TIMES 7 56 


There is no reason why both Loops should be 
travelling in the same direction (that is, 
why both should be counting upwards) as this 
variation of the program demonstrates: 


10 FOR A=1 TO 12 

20 FOR B=12 TO 1 STEP -4 

30 PRINT A;"TIMES";B;"-";A*B 
40 NEXT B:NEXT A 
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Here's part of the output of that program: 


6 TIMES 7 = 42 
6 TIMES 6 36 
6 TIMES 5 = 30 
6 TIMES 4 = 24 
6 TIMES 3 18 
6 TIMES 2 = 1р 
6 TIMES 1 = 6 

7 TIMES 12 = ВА 
7 TIMES 14 = 77 
7 TIMES 10 = 70 
7 TIMES 9 = 68 
7 TIMES 8 = 56 


BECOMING A MASTER-MIND 


It is time for our next real program. This 
15 а computer version of Mastermind, in 
which your VZ thinks of а four- -digit number, 
such as 5928, and you have eight guesses in 
which to work out what the number is. You 
not only have to work out the four numbers 
the computer has chosen, but also determine 
the order they are in. 


After each guess, the VZ300 will tell you 
how near you are to the final solution. А 
'white' is the right digit in the wrong 
position, and a 'black' is a correct digit 
in the right position within the four 
numbers of the code. As you can see, you are 
aiming to get four blacks. Digits may occur 
more than one in the four numbers (so a code 
of 4426 or even 8888 is possible). 
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Enter the program into your VZ300 and play a 
few rounds against’ the computer. Then, 
return to the book for a discussion on it, 
which will highlight the role played by the 
FOR/NEXT Loops. 


Here is the Listing: 


40 REM MASTER MIND 

20 CLS 

30 PRINT OG 4, UFSEEEESESSESASSSELSERESLSSELESSNS SEN 
40 PRINT "WHEN YOU ARE TOLD TO DO SO,","ENTER А 4-DIGIT NUMBER" 
50 PRINT "AND THEN PRESS <RETURN>," 

60 PRINT:PRINT "DIGITS CAN BE REPEATED" 

70 PRINT:PRINT "YOU'VE 8 GOES TO CRACK МҮ CODE" 
80 PRINT Пааа 88888 888885 

90 FOR J=1 ТО 1000:NEXT J 

100 DIM В(4),0(4) 

110 НО 

120 FOR A=1 ТО 4 

130 B(A)-RND(9) 

140 NEXT A 

150 FOR R=1 TO 8 

160 PRINT:PRINT "THIS IS GUESS NUMBER";R 

170 PRINT:INPUT "WHAT IS YOUR GUESS";G 

180 ТЕ G<1000 OR 659999 THEN 170 

190 Р-ІМТ(6/1000) 

200 0-ІМТ((6-1000%Р)/100) 

210 T-INT((6-1000*P-100*0]/10) 

220 5-ІМТ(5-1000%Р-100%0-10%Т) 

230 D(1)=P:D(2)=0:D(3}=T:D(4}=S 

240 FOR Е-1 ТО 4 

250 IF О(Е)<>В[Е) THEN 300 

260 PRINT " BLACK"; 

270 B(E)-B(E)440 
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280 D[E)-D[E]«20 Here's what the screen Looks Like at the 


pecan beginning of а гип: 
300 NEXT E = = ° 


310 IF H=4 THEN 510 

320 FOR F=4 TO 4 

330 D= (F) 

340 FOR X=1 TO 4 

350 IF D<>B(X) THEN 390 
360 PRINT " WHITE"; 

370 B(X)-B(X]440 


*okock € xx od*xoxkok ox ox og xg ЕЛЕНА xà 0 & хе x6 КАЈ 


WHEN YOU ARE TOLD TO DO SO, 
ENTER A 4-DIGIT NUMBER 
AND THEN PRESS «RETURN», 


DIGITS CAN BE REPEATED 


380 GOTO 400 | 
2e: эзы ыйы MARIUS nays 

400 NEXT F | 

Ара TOA _ And here's part of one game in progress: 


420 IF В(Х) 10 THEN 440 

430 B(X]-B(X)-40 

440 NEXT X 

450 H=0:PRINT 

480 FOR D=1 TO 1000:NEXT D 

470 PRINT " "NEXT В 

480 PRINTsPRINT "YOU DIDN'T WORK IT OUT!" 
490 PRINT "THE CODE WAS";B(1);B(2);B(3);B(4) 
500 GOTO 530 

510 PRINT:PRINT "WELL DONE, MASTER MIND!" 
520 PRINT "YOU DID IT IN";R;"GOES" 

530 PRINT:INPUT "ANOTHER GAME (Y OR N]";A$ 
540 IF LEFT$(A$,1]-"Y" THEN CLS:GOTO 110 
550 PRINT "OK BUDDY. THANKS FOR THE GAME" 


BLACK BLACK 


THIS IS GUESS NUMBER 5 





WHAT IS YOUR GUESS? 6977 
BLACK BLACK BLACK 


THIS IS GUESS NUMBER 86 


WHAT IS YOUR GUESS? 6947 
BLACK BLACK BLACK BLACK 
WELL DONE, MASTER MIND! 
YOU DID IT IN 6 GOES 


ANOTHER GAME (Y OR NJ? N 
OK BUDDY. THANKS FOR THE GAME 
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We'LL now go through the program, 
Line, а practice we'll be 
several of the programs in this book. 
don't want to read the detailed 
Little 


are а hard to 


tion and then come back to 


with. 

Lines 30 and 80 print a number of asterisks| 
to rule of the title and instructions. Line) 
90 pauses for a few seconds so you сап read) 


this, and then the screen is cleared. 


Arrays are dimensioned in Line 100. We'LL be 
Chapter. For 
all you need to know is that by saying) 
DIM В(4) you tell the computer you want tol 


discussing 
now, 


arrays in a Later 


create a [15% of objects, 
called B, in 


with the 


which the first item can be 


referred to as B(1), the second as B(2), and! 
You do not really need to dimension | 
an array when there are 11 or Less items inp 


so on. 


your List, but it helps to keep 


thinking and programs clear if you do always) 
array before using it in апу 


dimension ап 


program. 

In Mastermind, arrays are used for storing) 
the number picked by the computer, and for 
Storing the digits which you use each guess] 


when you try to break the code. 


Н 15 a numeric variable (we've met 
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moment], by all means skip over the explana- 
it Later when your 
have a bit more background knowledge to work 


then 
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before) which is set equal to zero іп Line 
110. In Line 290, 1 is added to the value of 
H each time a black is found, so if H ever 
gets to equal 4, the computer knows all the 
digits have been guessed, and goes to the 
routine from Line 520 to print up the 
message about your victory. 


The Lines from 120 to 140 work out the 
number which you have to try and guess. Line 
110 uses the RND function we've discussed 
before to get four random numbers in the 
range 1 to 9, and stores one each in the 
elements of the B array. Note that the 
first FOR/NEXT Loop of our program appears 
here. The A in Line 120 equals 1 the first 
time the [оор is passed through, 2 the 
second time and so on, 50 that the А in 130 
changes as well. 


Our next FOR/NEXT Loop, which uses R, starts 
in the next Line. It counts from 1 to B. t0 
give you eight guesses. Line 170 accepts 
your guess, after the previous Line has told 
you which guess it is you are entering. 


The numeric variable G is set equal to your 
guess, and Line 90 checks to make sure you 
have not entered a five-digit number, or one 
which has less than four digits. If you have 
done either of these things, the program 
goes back to Line 170 to ask you once again 
io enter your guess. 


The next 
through to 


section of the program, 
Line 450, works out how 


right 
well 
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Loops (240 to 300, 320 to 400, 340 to 390 
and 410 to 440). Line 470 sends the program 
back to the Line after the FOR R=... to go 
through the loop again. If the В [оор has 
been run through eight times, then the 
program does not go back to Line 150, but 
‘falls through' Line 470 to 480 to tell уои 
that you have not guessed the number in 
time, and to tell you what it is. Line 490 
prints out the four-digit code. 


you've done, using a number of FOR/NEXT | Chapter Six — Changing in Mid-Stream 


I pointed out at the beginning of the book 
that, in most situations, your VZ300 follows 
through a program in Line order, starting at 
the Lowest Line number and following through 
in order until the program reaches the final 


Line. 


This is not always true. The command GOTO 
allows you to break the orderly execution 


If you do manage to guess it, so that Н Ed noB. "D 


equals 4 in Line 310, then the program jumps 
to tine 510 to print out the congratulations 
message. 


Lines 530 to 560 provide the finishing 
touch. Line 530 asks you if you would Like 
to play again. If you do, then the computer 
goes back to 110 for another game. 


Even if you don't guess the four numbers in 
your eight goes, you're offered another go. 
By returning to Line 110, rather than 
starting the whole program again, you don't 
have to read through the instructions again 
before playing the game. 





As уои! 11 see from our next program, you can 


- use GOTO to send action through a program iri 
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any order you choose. 
and before you 
predict 
be: 


Enter this program, 
run it, see if you can 
what the result of running it will 


10 REM GO TO 

20 GOTO 50 

30 PRINT "THIS IS 30" 

40 GOTO 70 

50 PRINT "THIS IS 50" 

60 GOTO 30 

70 PRINT "THIS IS 70" 

80 FOR Z-1 TO 200:NEXT Z 
90 GOTO 50 


This rather pointless programs sends your 
poor VZ jumping all over the place, changing 
its position іп the program every time 1% 
comes to а GOTO command. Here's what you'll 
see on your screen when you run it: 


THIS IS 50 
THIS IS 30 
THIS IS 70 
THIS IS 50 
THIS IS 30 
THIS IS 70 
THIS IS 50 
THIS IS 30 
THIS IS 70 
THIS IS 50 
THIS IS 30 


THIS I 
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the REM 
Here it 
obeys 


The program ignores the first Line, 
statement, then comes to Line 20. 
finds the command GOTO 50 and when it 
it, it finds the instruction to print the 
message "THIS IS 50". It then continues on 
to Line 60, where it is told to GOTO 30. 
Without question, it zips back to Line 30 to 
print out "THIS IS 30", then goes to Line 40 
which directs it to GOTO 70. At Line 70 it 
finds the instruction to print out "THIS IS 
70" which it obeys. There is a short delay 
(Line 80) then Line 90 tells the VZ to GOTO 
50 which it does, and the whole thing starts 
again. 


RESTRICTIVE PRACTICES 


Making use of GOTO in this way is called 
unconditional branching. The command is not 
qualified in any way, so the VZ always obeys 
it. 


This brings us to the next computer words we 
will consider. These are a pair of words, 
IF and THEN, which are nearly always found 
together. They impose conditions on 
branching by GOTO commands. 


They are an easy pair of words to 
understand. IF something is true, THEN do 
something else. IF you are hungry, THEN 
order a hamburger. IF it is raining, THEN 
get an umbrella. IF you want a big car, THEN 
start saving. IF something, THEN something. 


The next program, which 'rolls a die' (using 
63 
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the random number generator) and then prints 


up the result of that die roll as а 
uses a number of IF/THEN Lines: 


10 REM DICE ROLL 
20 GOTO 140 

30 PRINT "ONE" 
40 GOTO 140 

50 PRINT "TwO" 
60 GOTO 140 

70 PRINT "THREE" 
80 GOTO 140 

90 PRINT "FOUR" 
100 GOTO 140 


110 PRINT "FIVE" 
64 
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490 GOTO 140 

430 PRINT "SIX" 

440 A-RND(6] 

450 FOR Z=1 TO 200:NEXT Z | 
460 IF А=1 THEN 30 
470 IF A=2 THEN 50 | 
180 ТЕ А=З ТНЕМ 70 | 
190 ТЕ А=4 ТНЕМ 90 | 
200 IF A=5 THEN 110 | 
210 IF A=6 THEN 130 


This is what you'll see when you run the 
program: 

SIX 

FOUR 

ONE 

SIX 

FOUR 

FIVE 





ONE 
FIVE 


So, we've looked at non-conditional and 
condition GOTO's to send action all over the 
place within a program. 


SUBROUTINES, ANOTHER WAY TO FLY 


There is another way to redirect the 
computer during the course of а program. 
This is by the use of subroutines. 
subroutine is part of a program which is 
called twice or more during the course of 
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running the main part of the program, and is 
more efficiently kept outside the main 
program than within it. 


The next program should make it clearer. In 
it, the computer throws a die over and over 





again. Тһе first time it is thrown, the 
computer is throwing it for you. The second 
time, it throws the die for itself. 


After each pair of dice has been thrown, the 
VZ300 will announce who is the winner. The 
higher number wins. 


The program uses a subroutine to throw the 
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die, so we do not need two identical ‘'die- 
throwing routines' within a single program. 
Enter апа run the program, then return to 
the book, and I'LL explain where the 
subroutine is within the program, and how it 
works: 


40 REM DICE SUBROUTINES 

20 GOSUB 210 

30 PRINT:PRINT 

40 FOR R=1 TO 2 

50 GOSUB 150 

60 IF R=1 THEN A=D 

70 IF R-2 THEN B-D 

80 NEXT R 

90 PRINT ТАВ(5);"55 "; 

400 IF A>B THEN PRINT "Vz 300 WINS" 
410 IF A«B THEN PRINT "HUMAN WINS" 
490 IF A-B THEN PRINT "IT'S A DRAWI" 
430 SOUND 25,1:SOUND5,1:SOUND 25,1 
440 RUN 

450 REM DICE ROLL SUBROUTINE 

160 D=RND(6) 

470 PRINT ТАВ(4); 

480 IF R=1 THEN PRINT " I ROLLED A";D 
490 IF R-2 THEN PRINT "YOU ROLLED A";D 
200 RETURN 

240 REM DELAY SUBROUTINE 

220 FOR P=1 TO 400:NEXT P 

230 RETURN 
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This is what you'll see when you run it: 


I ROLLED A 3 
YOU ROLLED A 6 
2» HUMAN WINS 


I ROLLED A 1 
YOU ROLLED A 4 
>> HUMAN WINS 


I ROLLED A 5 
YOU ROLLED A 5 
>> IT'S A DRAW! 


The program pauses for a short while on Line . 


220, returns to near the start of the 


program, prints two blank Lines, then enters 
When it gets to Line 


the R FOR/NEXT Loop. 
50, which it does once each time through the 
R Loop, the program is sent to the sub- 
routine starting at Line 150. 


Here, the 'die is rolled' in Line 160, and 
the numeric variable D is set equal to the 
result of the roll, using an IF/THEN to 
determine whether the computer should print 
out either "I ROLLED A..." or "YOU ROLLED 
A...". Then the VZ300 comes to the word 
RETURN in Line 200. The word RETURN signals 


to the computer that it must return to the 


Line after the one which sent it to the 


subroutine. 
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Changing in Mid-Stream 


In this program, Line 50 sent it to the sub- 
routine, so it returns to Line 60. 


There, the IF/THENS іп Lines 60 and 70 
determine whether the value of the roll 
(variable D has been set equal to this 
value) should be assigned to variable А or 
to variable B. 


Line 80 ends the FOR/NEXT Loop, and then 
Lines 100 through to 120 determine whether 
the VZ has won (which it will have done if A 
is greater than B, а condition which is 
tested using the > sign in Line 100), or 
whether the human has won (which happens if 
A is Less than B, a condition tested in Line 
110 with the < symbol). 


From here, the program RUNs again from the 
beginning. Remember, to stop the  VZ300 
running an 'endless' program of this type, 
you hold down the CTRL key, and press BREAK 
until the program halts. 


Study this Last program, until you're pretty 
sure you know how subroutines work. 
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Chapter Seven — Getting into Music 


The SOUND command is a great way to add Life 
to your programs. It is amazing, as you'll 
soon discover, what a small amount of sound 
can do to enhance a program. 
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SOUND is always followed by two numbers (ог 
by variables representing numbers). The 
first number is the pitch, or frequency, of 
the note to be played, and the second 
determines for how Long the note will sound. 
The pitch is a number between O and 31, and 
the duration is a number between 1 and 9. 
The pitch value of O produces no sound. It 
can be used as a 'rest', in music terms. 
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Here's a simple program which puts the SOUND 
statement through a few of its paces: 


10 REM SOUND DEMO 

20 FOR 5-0 TO 31 STEP 2 
30 SOUND 5,1 

40 NEXT S 


And you can combine more than one SOUND 


statement at atime within a Loop for an 
even more effective result. ALL you need to 


do is add a single Line - 35 - to the 
program above for an incredible change in 
the effect it produces: 


35 SOUND 31-S,1 


THE PHANTOM COMPOSER 


The VZ300 сап even write its own music - 
after a fashion. Enter and run the following 
program and you'll hear the magic for 
yourself: 


5 REM PHANTOM COMPOSER 
10 S-RND(31] 

20 D-RND(2) 

25 FOR J=1 TO RND(S3) 
27 NEXT J 

30 FOR J-1 TO RND(3) 
40 SOUND S,D 
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50 IF RND(0]».7 THEN SOUND 31-S,D 
60 NEXT J 
70 GOTO 10 


The Phantom Composer, as it pretty obvious 
from the program, choses notes and durations 
at random, апа plays them. From time to 
time, it will repeat a phrase two or three 
times (using the Loop from 30 through to 60) 
and sometimes add in an extra note during 
the repeat (Line 50). 


To become your own Phantom 
write music on the VZ300, you need to know 
the exact musical equivalents of the note 
and duration numbers. 


FREQUENCV 


Here are the frequencies for the VZ300. The 


first number is the number you use (as the 
first one after the SOUND command], 
second is its actual musical value: 


Ü- —NHESI T Ae 
eo are 3. Ве 
4 - СЗ 5 - C#3 
6 - D3 7 - Пад 
SG -— ES Sec. F9 
10 - F#3 11. ВЗ 
18.—,6f£3 13 - АЗ 
14 - АЯЗ ИЭ. Ва 
18: 64 17 - C#4 
18 - D4 19 - D#4 
eD.-—-E4 e1 - F4 
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22 ЕВА 2з - G4 

24 - Gf4 25 - A4 

26 - A#4 27 - B4 

28 - C5 29 - C#5 

30 - D5 31 - D#5 
DURATION 


Now, here are the relevant note Lengths. The 
number is the one you have after the 
comma in the SOUND command, and the second 
number is its value, taking a quaver to have 
a value of 1: 
Number Durzation 
1/8 
1/4 
3/8 
1/2 
3/4 
1 
1 1/4 
2 
3 


оп осмос > 0гӘ-> 


SOUND ADVICE 


The control numbers for the SOUND 
as Listed above, can һе the 
calculations, instead of being numbers or 
assigned variables. In the пехї program, 
SOUND ADVICE, you have to guess the number 
between 1 and 50 which the VZ has thought 
of. The feedback on each guess - which will 
help you home іп on the correct number in 
73 
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the shortest number of guesses - 15 іп the 
form of output produced by SOUND. 


The Lower the note, the closer you are to 
the correct answer. Once you've played the 
game a few times, you'll be pleased to see 
how skilled you become at interpreting the 
output. 

see оп the when 


Here's what you screen 


playing the game: 


THIS IS GUESS 5 
WHAT NUMBER AM I THINKING OF? 10 


NO, 10 IS WRONG 


THIS IS GUESS 6 
WHAT NUMBER AM I THINKING OF? 4 
NO, 4 IS WRONG 


THIS IS GUESS 7 
WHAT NUMBER AM I THINKING OF? 7 


YES! I WAS THINKING OF 7 
You GOT IT IN 7 TRIES 


And here's the Listing. Note that ABS in 
Line 100 stands for 'absolute' and gives the 
result of the calculation, stripped of its 
sign. That means, if the result of a 
calculation is a negative number, say -7, 
the ABS of that number is 7, so ABS(-7)=7. 
The ABS of a positive number is 
number, unchanged. 


74 


just the 





Getting into Music 


10 REM SOUND ADVICE 

20 CLS 

30 N-RND(50) 

40 R=1 

50 PRINT:PRINT "THIS IS GUESS";R 

60 INPUT "WHAT NUMBER АМ I THINKING O0F";GUESS 
70 IF GUESS<1 OR GUESS>50 THEN 60 

80 IF GUESS-N THEN 120 

90 PRINT "NO,";GUESS;"IS WRONG" 

100 S-ABS(N-GUESS):SOUND 5,2 

110 R=R+1:FOR D=1 TO 400:NEXT D:GOTO 50 
190 PRINT:PRINT "YES! I WAS THINKING ОҒ";М 
430 SOUND 31,1:SOUND 1,2:SOUND 31,1 

140 PRINT "YOU GOT IT IN";R;"TRIES" 


The first Line of the program is, of course, 


. just a REM statement to tell you the name of 


the program. The next Line clears the 
screen, and Line 30 sets the variable N 
equal to a number chosen at random between 1 
and 50. This is the number which you have to 
try and guess. 


The variable R is set equal to 1 in Line 40. 
As you've probably realised, this is used to 
count the number of guesses you have made. 


Line 50 prints up the number of the current 
guess and Line 60 asks you to enter a 
number. The following Line checks the size 
of your guess, rejecting it if it is above 
50 or below 1. 


Note that Line 70 ends with THEN 60, rather 
than THEN GOTO 60, as you may have expected. 
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You are allowed to Leave out the word GOTO 
after THEN, ав the VZ will understand what 
you mean. If, however, you feel that the 
Program will be easier to understand with 
the word GOTO in Place, Бу aLl means replace 
it, and do the same in the following Line. 


Line 80 checks your answer, and if it finds 
that your guess is the Same as the number 
the computer has thought of, it sends action 
to Line 120 where the congratulations 
message is printed. 


BUT WHAT IF YOU'RE WRONG? 


If you're not right, the Program goes on to 
Line 90 where the message "NO, Xx IS WRONG" 
is displayed. Now we come to the interesting 
bit. The variable S is set equal to the 
absolute difference between the computer's 
number and your guess. The sound is produced 
at the end of Line 100, 1 is added to the 
value of the variable R in the next line, 
and then after a Pause the program returns 
to 50 for your next guess, 


Loch MacDicksmith 


This beautiful Lake in northern Scotland is 
unknown to most tourists. Instead of a 
monster, Loch MacDicksmith has its very own 
piper, who plays on that traditional 
Scottish instrument, the VZ-bagpipes. If 
you want to hear the wonderful sounds the 
piper creates, run the next program: 
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10 REM VZ BAGPIPES 

20 DIM М(10) 

30 FOR S=1 TO 10 

40 READ М(5) 

50 NEXT 5 

60 M-RND(10) :D-RND(5) 

70 SOUND N(M),D 

80 FOR J=1 TO RND(2):NEXT J 

90 GOTO 60 

100 DATA 4,6,8,9,11,13,15,16,16,4 


MAKING VOUR OUN MUSIC 


If the 'auto-bagpipes' are too much for you, 
try the next Program, which allows you to 
use the bottom row of keys as а kind оғ 
organ. It is not too musical, but you should 
have some fun with it: 


10 REM VZ 300 ORGAN 

20 CLS 

30 CS=INKEY$ 

40 IF C$=""" THEN 30 

50 IF C$="Z" THEN SOUND 4,2 
60 IF C$="X" THEN SOUND 6,2 
70 IF C$="C" THEN SOUND 8,2 
B0 IF C$="V" THEN SOUND 9,2 
90 IF C$-"B" THEN SOUND 11,2 
110 IF C$="N" THEN SOUND 13,2 
120 IF C$-"M" THEN SOUND 15,8 
130 IF C$-"," THEN SOUND 18,2 
140 IF C$-"," THEN SOUND 18,1 
150 IF C$-" и THEN END:REM SPACE 
160 IF INKEY$<>"" THEN 160 
170 GOTO 30 
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To play the organ, just touch the keys on | 


the bottom row of the keyboard, as follows: 


Press this To get this 


Rey: note: 
Z C 
X D 
C E 
V F 
B G 
N А 
М В 
С! 
А D' 


Press the space bar to end the music. 
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Chapter Eight — A Game and a Test 


It's time now to take a break from the 
serious business of Learning to program. As 
you can see in this chapter, we Пауе two 
major programs which use many commands which 
have not yet been explained. I suggest you 
enter the programs just as they are and play 
them for your own enjoyment, and forget 
about Learning for a while. 


I don't think it's fair to keep you waiting 
for major programs until you've covered 
everything on the VZ300. Also, entering 
short demonstration programs can get pretty 
boring if you're Longing to see your 
computer really in action. Therefore, I hope 
you'll enter the programs 'on trust', 


returning to this chapter for the explana- 


tions when you're ready. Of course, you 
don't have to enter the programs right now. 
If you'd prefer to continue with the 
Learning, then just go on to chapter nine. 


OUT ON THE FAIRWAY 


In the first game, you and your versatile VZ 
have to tackle the Dicksmith Golfcourse. 


You have nine holes to negotiate, апд ав 
you'll see when you play the game, the VZ 
obligingly keeps the score card for you. 
After each hole, it will tell you how well 


you're doing to date, and then will work out 


the average score per hole. ALL you have to 
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do is hit the ball. If you overshoot, the VZ- 
will automatically ensure that the next shot 


is back towards the hole. 


Here's what the Looks Like in 


action: 


program 


SCORE UP TO THIS HOLE IS 6 
<< HOLE NUMBER 2 >> 
DIFFICULTY FACTOR IS THREE 


0 
НННЕНИННЕНЕНИТЕ /HHH 
ЯННННННННННННННННННННННЕ HSHH 


AAARAARAARABRAAARKRAAARRAARARARARAA 


ENTER STROKE STRENGTH? 12 


SCORE UP TO THIS HOLE IS 14 
<< HOLE NUMBER 3 >> 
DIFFICULTY FACTOR IS FIVE 


HHHHHHHHHHHI /HBH 
ННННННННННННННННННННННННННННННЕ 


4 4 д 0 Фь 4% 4ь 4ь 4дь 4ь дь 4 4% 4ь 4ь 4 дь 4 4% дь 4ь 4ь 4% 4 4 4 4ь 4 4 4 ж 


ENTER STROKE STRENGTH? 2 
YOU DID IT! 


THE GAME SO FAR: 

HOLE 1 TOOK 6 STROKES 

HOLE 2 TOOK 8 STROKES 

HOLE 3 TOOK 9 STROKES 

THE AVERAGE SO FAR IS 7 

SCORE FOR 3 HOLES IS 23 
80 





A Game and a Test 


You'll probably find it pretty tricky going, 
especially on holes with a high difficulty 
factor. 


Here's the Listing, golf pro: 


40 REM GOLF 

20 DIM X(9) :C-0:H$-CHR$ (48) 

30 U=224 

35 L$-" | ":ВЕМ 32 SPACES 
40 FOR 2-1 TO 9 

45 CLS 

50 SC=0 

60 J-RND(12) 

70 G=RND(3)+2 

80 ТЕ 0-5 THEN Q$-"FIVE" 

90 IF 0-4 THEN Q$="FOUR" 

400 ТЕ Q-3 THEN Q$="THREE" 

110 PRINT 6448,L$:PRINT 664, 

415 IF 7-1 THEN PRINT 

420 IF Z>1 THEN PRINT "SCORE UP TO THIS HOLE IS"; 
430 IF Z=2 THEN PRINT Х[1) 

435 IF Z>2 THEN PRINT K 

140 PRINT "<< HOLE NUMBER";Z;"»5" 
150 PRINT "DIFFICULTY FACTOR IS ";0$ 
460 GOSUB 430 

170 PRINT 

475 INPUT "ENTER STROKE STRENGTH" А 
177 SOUND 31,1 

180 PRINT 60,15 

185 IF J>24 THEN А--А 

200 J-J-INT(A/RND( 0] ) 

205 IF J=24 THEN GOSUB 490 

206 IF J»30 THEN J=30 

207 IF J<1 THEN J=1 


210 ТЕ J<>24 THEN PRINT @U+J-1,H$ ES 
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8e 


215 IF J<>24 THEN PRINT@352,L$:PRINT L$ 
220 SC-SC44 

230 PRINT @448,"YOUR SCORE IS NOW'";SC 

240 FOR Р-1 TO 700:NEXT P 

250 ТЕ J<>24 THEN 110 

260 C=C+SC 

270 X(z)=SC 

280 ТЕ 2-4 THEN 390 

290 K=0 

300 PRINT "THE GAME SO FAR:" 

310 FOR J=1 TO 2 

320 К=К+Х(Ј) 

330 PRINT "HOLE"J"TOOK"X(J) "STROKES" 

340 FOR M=1 TO 300:NEXT M 

350 NEXT J 

360 IF Z=9 THEN 370 

365 PRINT "THE AVERAGE SO FAR IS"INT((K+.5)/Z) 
370 FOR P=1 TO 1000:NEXT P 

380 ТЕ 221 THEN 390 

385 PRINT "FIRST HOLE SCORE:"C 

386 GOTO 400 

390 PRINT "SCORE FOR"Z"HOLES IS"C 

400 FOR М-1 ТО 2500:NEXT М 

410 NEXT Z 

420 GOTO 560 

430 IF J»30 THEN J=30 

435 PRINT 6196,'" 

440 PRINT TAB(J-1) ;H$ 

450 PRINT "НННННЫНЫННЫНҒ /ННННН" 
AGO PRINT ЧНННННННННННННННЫННННННЕ ННННН" 
470 PRINT "-55<5<<<<ееасаааала лала алалап 
480 RETURN | 

490 PRINT@416,"YOU DID IT!" 

500 РВІМТӨЗ11,Н% 

510 FOR Р-1 TO 300:NEXT P 





A Game and a Test 


520 SOUND 21,4:SOUND 16,2 

525 SOUND 16,1:SOUND 18,4 

527 SOUND 16,4:SOUND 0,1 

530 SOUND 20,4:SOUND 21,4 

540 FOR P=1 TO 2000:NEXT P 

550 RETURN 

560 PRINT "END OF THAT ROUND!" 

570 PRINT | 

575 PRINT "YOU SCORED"C 

580 PRINT "& YOUR AVERAGE МА5"ІКТ((С--,51/9) 
590 PRINTsPRINT 

600 PRINT “ENTER "У" FOR A NEW ROUND," 
605 PRINT " OR 'N' TO QUIT" 

610 AS=INKEY$ 

620 ТЕ A$<>"Y" AND A$<>"N" THEN 610 
630 IF A$="Y" THEN RUN 

640 PRINT 

650 PRINT "ОК, SEE YOU AGAIN SOON" 


TESTING YOUR SPEED 


The second program in this chapter, REACTION 
TESTER, is great fun to play. You enter the 
program, RUN it, and the message "STAND BY" 
appears. After an agonizing wait, the words 
will vanish, to be replaced by the words 
cok, HIT THE 'Z' KEY". 


As fast as you can, you have to Leap for the 
'Z' and press it, knowing that the VZ300 is 
keeping count of your actions all the time. 


The computer will then tell you how quickly 
you reacted, and then compare this with your 
previous best time. "THE BEST SO FAR IS..." 
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appears on the screen, and the VZ then waits 
for you to take your hands off the keyboard 


M Lam menn > 
ue <<, > 





to prevent cheating (ав if you'd do such a 
thing!) before the whole process starts 
again. 


YOUR SCORE IS 22.0224 
OK, HIT THE "2" KEY! 
THE BEST SO FAR IS 13.9986 


STAND BY 
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The game continues until you manage to get 
your reaction time down below 4, which is 
not at all easy to do. 


Here's the Listing of REACTION TEST: 


5 REM REACTION TESTER 

7 CLS 

40 HS=1000 

45 FOR w-1 TO 3000 

46 COLOR 3,1 

47 IF HS<4 THEN 95 

49 CLS 

20 PRINT @236,"STAND BY" 

25 GOSUB 105 

27 COLOR 2,0 

30 GOSUB 100 

35 IF A$<>"" THEN 25 

40 C=0 

42 COLOR 1,1 

45 PRINT 6134,"0К, HIT THE 'Z' KEY!" 
50 C=C+1.07+RND (0) 

52 PRINT @1,C;" " 

55 GOSUB 100:IF C>=200 THEN 90 
60 IF A$<>"Z" THEN 50 

65 PRINT 

67 PRINT "YOUR SCORE IS";C 

70 IF C«HS THEN HS=C:SOUND 30,2 
75 PRINT:PRINT:PRINT 

77 PRINT "THE BEST 50 FAR IS";HS 
78 GOSUB 105 

80 GOSUB 100 

85 IF A$<>"" THEN 80 

90 NEXT W 

95 PRINT 


97 PRINT "YOU'RE THE CHAMP!" p 
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98 SOUND 31,5:SOUND 28,5:SOUND 1,2:SOUND 31,5 
99 SOUND 7,7:SOUND 3,1:END 

100 A$=INKEY$:RETURN 

105 FOR P=1 TO 500«RND(S99] 

110 NEXT P 

115 CLS:RETURN 


OK, that's enough fun. Time to get back to 
the hard slog in chapter nine. 
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Chapter Nine — Stringing Along 





You'll recall that Several times in this 
book So far we've referred to numeric 
variables (which can be Letters such as A or 
B, words Like CN or GS, or combinations of 
Letters and numbers such as R2 or D2). We've 
also talked about String variables (a Letter 
followed by a dollar Sign, such as A$ ог 6% 
if a string variable). In this chapter, 
ме' 11 be Looking at strings, and at things 
you can do with them. 


THE CHARACTER SET 


Every letter, number or symbol the computer 
Prints has a code number. Telling the 
computer to print the character of that code 
produces the character. The codes are known 
a ASCII (pronounced 'ass-key') codes, which 
is an almost universal (in the world of 
computers) code for Letters, numbers and 
symbols, in which a number between O and 255 
is assigned to each of them. The number 65, 
for example, always stands for MAT a 


Now, the ASCII code of "А! is 65. You know 
this, because I just told you. If I hadn't 
told you, how would you have found out? 


The computer word to find out a code is ASC. 
Try it now. Enter the following into your 
VZ300, and see what you get: | 


PRINT ASC("A") 
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Note that the letter for which you want the 
code must be within brackets, and quote 
marks as above. When you enter that Line on 
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your Бој and press RETURN, you should get an 
answer of 65. (Тһе ASC value of the Letter 
"AM has nothing to do with the value 
assigned to A when it is a numeric variable. 
If it is in quote marks, it is a letter, the 
Letter "A", If it is not in quote marks, it 
is a numeric variable, A.) 


VA. 





From the short demonstration Line above we 
confirmed that 65 was indeed the ASC of "A", 
We can turn a 65 into the letter "А" by 
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asking the computer to print the character 
which corresponds to ASC code 65. We do this 
with the word CHR$, as follows: 


PRINT CHR$(65) 


When you enter this into the old VZ, and 
press RETURN, the Letter "А" will appear on 
the screen. 


You сап print out every ASC code and its 
character with the next short program. Enter 
it, and watch closely when you run it: 


10 REM CHARACTERS 

20 FOR J-32 TO 255 

30 PRINT J;CHR$(J);" "; 
40 FOR D=1 TO 100:NEXT D 
50 NEXT J 


This is the start of what you'll see printed 
out on the screen: 


32 33 ! g4 " 35 # 
36 $ 37 X 38 & gg * 
40 ( 41 ) 42 2 43 + 
44, 45 - 46. 47 / 
48 0 48 1 50 2 513 
52 4 53 5 54 6 55 7 
56 8 57 9 58 : 59: 
60 < 61 = 62 > 63 ? 
64 @ 65 A 66 B 67 C 
68 D 69 Е 70 Ғ 71 6 - 
72 Н 73 І 74 J 75 K 89 
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76 | 77 М 78 М 78 0 
80 P 810 82 R 83 S 
84 Т 85 U 86 V 87 W 


15 A=65+RND (26) 
16 IF A=B THEN 15 


ввх 88Ү 902 91[ 17 B-A 
8B %;.88 1,2942 1595. — 20 5-0 
96 97! ов" 99# 25 PRINT 6423,CHR$(A) 
35 А$=ІМКЕҮ$ 
40 IF A$-CHR$(A) THEN 70 
TESTING YOUR CHARACTER 45 5=5+1 
50 PRINT 6293,5 


60 IF S<200 THEN 35 

65 PRINT "SORRY — TIME IS Шр" 
67 GOTO 80 

70 SOUND 30,3 

72 PRINT "WELL DONE, YOU SCORED" 
75 PRINT " ";S"QON THAT ONE!" 

80 IF S<BEST THEN BEST-S 

85 РВІМТ :РВІМТ 

90 PRINT "BEST SCORE SO FAR": 

92 PRINT " IS";BEST 

93 IF BEST-3 THEN END 

95 FOR Pz1 TO 18*S:NEXT P 

100 CLS:SOUND 4,4:SOUND 20,3:SOUND 4,2 
105 GOTO 15 


Our next program is a reaction tester, a 
Little Like the one we played with in the 
preceding chapter. However, in this one 
you're not just being tested оп speed. In 
this program you have to try and find the 
right key as quickly as possible. 


A Letter will appear on the screen. As 
quickly as you can, find that letter on the f 
keyboard and press it. You'll be told how © 
Long it took you, and this time will be 
compared to your best time. 


Notice how the Letter which is printed оп 

the screen uses CHR$ in Line 25, where 1+ 
prints the character of a number chosen at 
random by Line 15 and assigned there to / 
variable A. A$ is set equal to INKEY$ (which 
reads the current key you're touching, 
without you having to press the RETURN key) 
in Line 35 and compared with the letter your 

VZ has chosen, in Line 40. 


CUTTING THEM UP 


One of the very useful as 

pects of the BASIC 
used on the VZ300 is the way in which it can 
. be used to manipulate strings. 


The words used to handle strings are: 
5 REM CHARACTER TEST 


6 BEST=200 LEFT$ 
7 CLS MID$ 
8 GOSUB 95 RIGHT$ 


90 25 
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' Left- 
'right-string'. 


These аге 
string', 


usually spoken aloud ав 
'mid-string! and 


Our next program shows them in action. Enter 
it and run it on the VZ, then return to the 
book for a brief discussion to see what can 
be Learned from it. 


5 REM STRINGS 

7 CLS 

10 A$="THE*ELECTRIC*DICK" 

45 PRINT "LEFT$(A$,3)="sLEFT$(A$,3) :GOSUB 55 
20 PRINT "LEFT$(A$,5]-";LEFT$(A$,5]:G0SUB 55 
25 PRINT "RIGHTS$(A$,3)-";RIGHT$(A$,3]:G0SUB 55 
30 PRINT "RIGHT$(A$,5)-";RIGHT$(A$,5]:GO0SUB 55 
35 PRINT "MIDS$(A$,3)-";MID$(A$,3):GOSUB 55 

40 PRINT "MID$(A$,5)="sMID$(A$,5)sGOSUB 55 

45 PRINT "MID$(A$,5,4)-" ;MID$(A$,5,4): GOSUB 55 
50 PRINT "MID$(A$,2,7)]-2";MID$(A$,2,7]:G0SUB 55 
52 END 

55 FOR J=1 TO 300:NEXT J:RETURN 


Look at the output. 


LEFT$(A$,3)-THE 
LEFT$(A$,5]-THE*E 
RIGHT$(A$,3]-ICK 
RIGHT$(A$,5)-*DICK 
MID$(A$,3]-E*ELECTRIC*DICK 
MID$(A$,5)-ELECTRIC*DICK 
MID$(A$,5,4)-ELEC 
MID$(A$,2,7)-HE*ELEC 
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As you can see, the program first, in Line 
10, sets the string variable A$ equal to the 
string "THE*ELECTRIC*DICK". Then it uses 
LEFT$, RIGHTS апа MID$ to extract portions 
of that string. 


ыға Хас 
22 





Look at the first Line of 
LEFT$(A$,83)-THE. LEFT$ takes the Leftmost 
portion of the string, as far as the number 
which follows the string. That is, when we 
have LEFT$(A$,3) it takes the three Leftmost 
characters of the string. The next printout, 


the output. 


LEFT$(A$,5) takes the five Leftmost 
characters of the string, producing in this 
case THE*E (because they are five leftmost 


characters of the overall string). x 
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It can be used slightly differently. If we 
Said... 


PRINT LEFT$("THE*ELECTRIC*DICK" ,3) 


...the VZ would 
print out THE just the same as it did in the 
program. The string, then, can either be a 
string variable (A$) or the string in full 
("THE*ELECTRIC*DICK"). 


As you've probably worked out by now, RIGHTS 


does the same thing as LEFT$, except 1% 
starts at the righthand end of the string. 
Therefore, RIGHT$(A$,3) selects the three 


rightmost characters of the string, in this 
case, ICK. Again, as above, this is the same 
as saying: 


PRINT RIGHT$("THE*ELECTRIC*DICK", 4) 


MID$ is a Little more flexible. It selects a 
portion from the middle of the string, 
starting from the character number which 
follows the string. Therefore, MID$(A$,4) 
prints all the string starting with the 
fourth character. 

If there is only one number, such as the 4 
above, then 
to the епа of it. However, if there is 
another number, this second number dictates 
the Length of the string which will be 
extracted. 


You can see in the Last two printouts from 
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Stringing Along 


the program that MID$(A$,5,4) prints the 


extract of the string four characters Long, 
starting from character five. MID$(A$,2,7) 
produces а string seven characters long, 


starting from the second character. 


Rerun the program now, putting your name in 
place of THE*ELECTRIC*DICK in Line 10. 


PUTTING THEM BACK TOGETHER 


Strings can be added together on the VZ. The 
process of adding strings is called the 
frightening-looking word concatenation. You 
can concatenate two or more complete strings 
together, or just add bits of them, as our 
next program shows: 


5 REM JOINING STRINGS 
7 CLS 

10 A$="DICK*SMITH" 

15 B$="*AUSTRALIA" 

20 С$=А$+В$ 

25 PRINT "А$=";А$ 

30 PRINT "B$-";B$ 

35 PRINT "C$-";C$ 

40 D-RND(8) sE=RND(12)4D 
45 PRINT "MIDS(C$"D" ,"E")-" ;MIDS(C$,D, E] 
50 D$=MID$(C$,D,E) 

60 FOR J-1 TO 50:NEXT J 
65 GOTO 40 


When you run this program, which creates C$ 
in Line 35 by concatenating A$ and B$, 
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1 1 ә 
you'll see results like these: And here are two runs of the program: 


A$=DICK*SMITH 

B$-*AUSTRALIA 

C$-DICK*SMITH*AUSTRALIA DDDD 

MID$(C$ 3 , 6 )=CK*SMI | IIIIII 
MID$(C$ 6 , 10 J=SMITH*AUST CCCCCCCC 
MID$(C$ 8 , 10 J=ITH*AUSTRA KKKKKKKKKK 
MID$(C$ 2 , 5 J=ICK*S $**552525255* 
MID$(C$ 4 , 4 )=DICK 49884. .44 44.444 еже 
MID$(C$ 8 , 14 )-ITH*AUSTRALIA SSSSSSSSSSSSSSSS§S 
MID$(C$ 4 , 12 )=K*SMITH*AUST 


MMMMMMMMMMMMMMMMMM 
IIIIIIIIIIIIIIIIIIII 
ТТТТТТТТТТТТТТТТТТТТТТ 


HHHHHHHHHHHHHHHHHHHHHHHH 
жж» ааа я 


*oxEk x xo «ж хехе «жежеже ж 
ЖЕТ еке еже еке <жехе ег ехе «жж 


PLAYING AROUND 


You can do а number of things with string | 
manipulation, as our next program demon- 
strates. NAME PYRAMID allows you to enter 
your name to produce a somewhat interesting | 
display. Once you've seen the program | 
running, you'll understand why it has been 
given its name. 


жж 
Here's the Listing: TTTT 
IIIIII 
10 REM NAME PYRAMID MMMMMMMM 
20 CLS жа каа 
30 INPUT "WHAT IS YOUR NAME";N$ HHHHHHHHHHHH 
40 CLS AAAAAAAAAAAAAA 
50 IF LEN(N$}™5 THEN N$-LEFT$(N$,15) RRRRRRRRRRRRRRRR 
60 FOR L-1 TO LEN(NS) TTTTTTTTTTTTTTTTTT 


70 PRINT TAB(16-L] ; 
80 FOR H-1 TO 2*L 

90 PRINT MIDS$(N$,L,1); 
100 NEXT H:zPRINT 

110 NEXT L 


NNNNNNNNNNNNNNNNNNNN 
EEEEEEEEEEEEEEEEEEEEEE 
LLLLLLLLLLLLLLLLLLLLLLLL 


LLLLLLLLLLLLLLLLLLLLLLLLLL 


£*tttsktiuss$22$$2$2$22225225xZx 
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Chapter Ten — Reading DATA 


In this chapter, ме! 11 be Looking at three 
very important additions to your programming 
vocabulary: READ, DATA and RESTORE. 


a OO х 
ду, SON (AD 
° өө 





They аге used to get information which is 
Stored in one part of a Program to another / 
part where it can be used. Enter and гип 
this program to see them in action: 


10 REM READ/DATA 
20 CLS 

30 DIM А(5) 

40 FOR B=1 ТО 5 





Reading DATA 


50 READ А(В) 

60 PRINT А(В) 

70 NEXT B 

80 DATA 3676,321,-473,4499,33 


Using Line 50, the Program READs through the 
DATA statement in Line 80 in order, printing 
up each item with Line 60. 


RESTORE moves the computer back to the first 
item of DATA іп a program, as you'll 
discover if you modify the above program, by 
adding Line 45 fto it, so it reads as 
follows: 


10 REM READ/DATA 

20 CLS 

30 DIM А(5) 

40 FOR B=1 ТО 5 

45 IF B=3 THEN RESTORE 

50 READ А(В) 

60 PRINT А(В) 

70 NEXT B 

80 DATA 3676 ,321 ,-473, 4499, 33 


It does not matter where in the Program the 
DATA is stored. The VZ will seek it out, in 
order from the first item of DATA іп the 
Program to the last, as our next program 
(which Scatters the DATA about іп an 
alarming way) convincingly demonstrates: 


1 DATA 3676 
10 REM READ/DATA 


20 CLS 99 
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30 DIM А(5) 

40 FOR B=1 TO 5 
45 DATA 321,-473 
50 READ А(В) 

60 PRINT А(В) 

65 DATA 4499 

70 NEXT B 

80 DATA 33 


READ and DATA work just as well with string 
information: 


10 REM READ/DATA 

20 CLS 

30 DIM А%(5) 

40 FOR В-1 TO 5 

50 READ А5(В) 

60 PRINT A$(B) 

70 NEXT B 

80 DATA VZ300,DICK ,SMITH, ELECTRONICS ,KANGAROO 


Note that string DATA does not have to be 
enclosed within quote marks, unless pre- 
ceding, or trailing spaces, and/or 
punctuation and symbols аге significant, and 
must be considered part of the DATA. 


You can mix numeric and string ВАТА within 
the same program, so long as you take care 
to ensure that when the program wants а 
numeric item, a number comes next in the 
DATA Line, and when it wants a string item, 
it can find what it needs: 
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Reading DATA 


10 REM READ/DATA MIXED TYPE 
e0 CLS 
30 FOR B-1 TO 5 


40 READ A$,A 


50 PRINT A$,A 

60 NEXT B 

70 DATA DICK,23,SMITH,99 

80 DATA ELECTRONICS, 41234 

90 DATA VZ300,4,COMPUTER, 1411 
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Chapter Eleven — Getting Listed 


An array is used when you want to create a 
List of items, and refer to the item by just 
mentioning the position within the List 
which the item occupies. You set up an 
array by using the command DIM (for 
dimension). 
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If you type in DIM А(20), the VZ will set up 
a list іп its memory called А, and save 


space for twenty-one items: А(0), А(1), 
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А(2)...апа so on...up to A(20). Each оғ 
these items - the А(7) and the rest - are 
called elements of the array. 


When you dimension, or set up, an array, the 
VZ300 creates the List in its memory, and 
then fills every item in that List with a 
zero. So if you told your computer to PRINT 
A(3), it would print a O. i 


You fill the elements of an array with 
values with a statement Like A(3)-1000, or 
by using READ and DATA as we saw in the 
previous chapter. And once you've given an 
item a value, you can get the VZ to tell you 
what value the element has by typing in 
PRINT A(n). You can also manipulate the 
element as though it was a number. That is, 
A(4)*6 is valid, as if 45-A(6) and so on. 


Тһе VZ300 will Let you use ап array of up to 
eleven elements - that is, А(0) through to 
А(10) - without having to use а DIM 
Statement first. The moment it comes across 
the reference to an array, where the 
Subscript (the number which follows the 
Letter name of the array, іп brackets, is 
called the subscript) is between 0 and 10, 
it automatically creates an array. However, 
it is good practice to always dimension 
arrays, even if you're only. using subscripts 
from 0 through to 10. 
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THE FORGOTTEN ELEMENT 


You may Like to 'forget' about the element 
which has the subscript of zero, and pretend 
that the array starts at one. Many times 
you'll find it easier, as I always do, to 
assume that a statement Like DIM А(ВО) gives 
you array of 80 elements (rather than 81, as 
is the case), and that the first element is 
A(1) rather than А(0). 


The first program in this chapter dim- 
ensions, or sets up, an array called A, with 
room for 15 elements, although we will 
ignore the element with the subscript 0. The 
B Loop, from Lines 40 through to 60, fills 
the array with digits between 1 and 9, 
randomly chosen, and then prints them back 
for you with the Loop from 70 through to 100 
(with a slight pause being created Бу Line 
90). 


Here is the Listing: 


10 REM ARRAYS 

20 CLS 

30 DIM А(14) _ 

40 FOR B=1 TO 14 

50 A(B)-RND(9) 

60 NEXT B 

70 FOR Z=1 TO 14 

75 PRINT ТАВ(4+[2>9)); 

ВО PRINT "А(";2;") IS ";А(2) 
90 FOR DELAY=1 ТО 100: МЕХТ 
400 NEXT 2 
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And here is one example of it in use: 


A{ 1) IS 5 
Ај 2} IS 7 
AC. 8: То. 4 
Ај 4) IS 4 
А( 5) IS 8 
А(6) IS 1 
АҒ? )?IS- 4: . 
А(8) IS 1 
А( 9) IS 8 
А( 10) IS 4 
A(11) IS 5 
A( 12) IS 7 
A( 13) IS 6 
A( 14) IS 8 


This is called a one-dimensional array, 
because a single digit follows the Letter of 
the name which Labels the array. 


You can also have multi-dimensional arrays, 
in which more than one number follows the 
array label after the DIM. In our next 
program, for example, the VZ sets up a two- 
dimensional array called A, consisting of 
five elements by five elements. It is dim- 
ensioned by the Line DIM A(4,4) as you can 
see in Line 30: 


10 REM MULTI-DIM ARRAYS 

20 CLS 

30 DIM А(4,4) 

40 FOR B=1 TO 4:FOR C=1 ТО 4 
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50 A(B,C)-RND(9) 

60 NEXT C,B 

70 COLOR 8:PRINT " 423 4" 
80 PRINT TAB(3) ;"HHEHEHE E E E 
90 FOR B-1 TO 4:PRINT B;"£'; 

100 FOR C=1 TO 4:PRINT А(В,С); 

410 NEXT СіРВІМТ "Е":МЕХТ B 

190 PRINT TAB(3) "ННН" 


When you run it, you'll see something Like 
this: 


dod. Ж 
HHHHHHH 
1#3 9 9 1f 
547 B 7-3 # 
34£9 3 6 74 
4#65 6 94 
HHHHHHH 


You specify the element of a two-dimensional 
array by referring to both its numbers, so 
the element 1,1 of this array (the element 
in the top left hand corner of the printout 
above) is З and is referred to ав A(1,1). 
The 1 in the bottom row is A(4,3) and the 5 
next to it is А(4,4). 


STRING ARRAYS 


Your VZ300 also supports string arrays. 
Enter and run the following short program to 
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see string arrays in operation: 


10 REM STRING ARRAYS 

20 CLS 

30 DIM А%(5) 

40 FOR В=1 TO 5 

50 A$(B]-CHR$(RND(25]«65] 

60 A$(B]-A$(B]4CHR$ (RND(25]465] 

70 NEXT B 

80 FOR B-1 TO 5 

90 PRINT TAB(4);"A$(";B;") IS ";AS(B] 
100 NEXT B 


Here's one printout of the program: 


А5( 1 ) 15 DZ 
А$( 2 ) IS ZM 
A$( 3 ) IS YT 
A$( 4 ) IS ХЕ 
A$( 5 ) IS SY 


You can, of course, fill the elements of an 
array, string or numeric, via DATA or INPUT 
Statements. Here is a string array which is 
filled using DATA: 


10 REM STRING ARRAYS 
20 CLS 
30 DIM А%(5) 
40 FOR B-1 TO 5 
50 READ AS(B) 
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70 NEXT B 
80 FOR B=5 TO 1 STEP -1 

90 PRINT TAB(4) ;"A$(";B;") IS ";AS(B) 

100 NEXT B | 

110 DATA ELECTRONICS, SMITH,DICK,FROM, VZ300 


This is the result of running it: 


А5( 5 ) IS VZ300 

А5( 4 ) IS FROM 

А5( 3 ) IS DICK 

A$( 2 ) IS SMITH 

A$( 1 ) IS ELECTRONICS 


ESCAPE FROM MURKY MARSH 


The final program in this chapter  demon- 
strates the use of a two-dimensional array 
for 'holding' an object, апа for moving it 


around within the array. The shape is 
trapped in а murky marsh, and by moving 
totally at random, it hopes one day to be 


able to escape from the marsh. The shape is 
free if it manages to stumble onto the outer 


rows. 


way, 


The shape in this program, һу the 
random 


demonstrates 'Brownian Motion', the 
movement Shown by such things ав tiny 
particles іп а drop of water when viewed 
under а microscope, or of a single atom of 
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gas in a closed container. Brownian motion 
explains why a drop of ink gradually mixes 
into the water into which it has been 
placed. 


showing 
murky 


Here is the 
Brownian Motion іп 
marsh: 


program Listing, 
action іп the 


40 REM MURKY MARSH 

20 CLS 

30 DIM А(10,10) 

40 M0 

50 GOSUB 240 

60 IF 059 OR P»9 THEN 320 

70 P-P-1:IF RND(0)».35 THEN P=P+2 
80 Q-Q-1:IF ВКО(0)2.85 THEN Q=0+2 
90 ТЕ Q<1 THEN 0=1 

100 ТЕ 0240 THEN 0-40 

110 ТЕ P<4 THEN P=1 

190 IF P40 THEN P-40 

130 MzM44 

140 PRINT @40,"ATTEMPT NO,"M" " 
150 A(P,0]-94 / 

160 PRINT 665, 

170 FOR X-4 TO 40 

175 PRINT ТАВ(10); 

180 FOR Y-4 TO 40 

190 PRINT СНН%(А(Х,Ү)); 

200 NEXT Y 

210 PRINT 

230 NEXT X:SOUND RND(31),4 

235 А(Р,0)-254:60Т0 60 

240 Q-RND(3]44 

250 P=RND(3)+4 


109 





Programming the VZ300 


260 FOR X=1 TO 10 

270 FOR Y=1 TO 10 

280 А(Х,Ү)-254 

290 МЕХТ Ү,Х 

300 RETURN 

310 REM — THE END — 

320 PRINT 

330 PRINT ТАВ(5) ;"МНЕМ! FREE AT LAST!" 





Chapter Twelve — Using the Graphics 


Your VZ3800 can produce some very effective 
displays, using the different modes and 
colours. 


THE MODES 


As you know, the VZ can operate with two 
different kinds of display, called modes. 
The first mode, and the one which 15 most 
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frequently used, is mode 0, which is pre- 
dominately а text mode. The VZ is іп this 
mode when you first turn it on. 


You can use numbers, Letters and the onboard 
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'chunky' graphics in mode 0. This mode has а 
resolution of 31 by 16. That is, the screen 
can fit 32 characters across and 16 down, as 
if it was divided into 512 Little rect- 
angles, each of which holds опе character. 
Using the chunky graphic blocks - the Little 
squares with bits missing from them оп the 
keys - can give you the effect of producing 
pictures on a slighly higher resolution, 64 
by 92. 


The second mode, mode 1, is the high res- 
olution graphics mode. Relatively find 
individual points сап be printed оп the 
screen to create clear pictures. You cannot, 
however, print text in this mode. 


The mode 1 resolution is 128 by 64, with 128 
points across and 64 down. The co-ordinates 
of these points, which are called pixels in 
VZ-speak, begin in the top Left hand corner 
of the screen, at the point described as the 
Location (0,0). 


USING COLOUR 


You can use colour in both modes (although 
the command uses the American spelling of 
'color'). The background screen colour can 
be green or orange. As you know, the screen 
is green when the computer is first turned 
on, but it can be changed to orange very 
simply, just by typing in the following, 
then pressing RETURN: 


COLOR, 1 
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Note the comma before the number. To turn 
the screen green again, without turning the 
computer off, enter this: 


COLOR ,O 


There are eight colours which can be used in 
both modes. In mode 0, these colours can 
only be used on the onboard graphics. 
High resolution colour is slightly different 
from that used in mode 0, You have to assign 
a colour to the plotted points, or you won't 
be able to see them. 


The high resolution background colours are 
green and grey. You need to use two numbers, 
as well as the two co-ordinates, to assign a 
colour to a pixel. Try this: 


10 MODE(1) 

20 COLOR RND(4) ,1 
30 X=RND(120) 

40 Y=RND(60) 

50 SET(X,Y) 

60 GOTO 20 


The SET function assigns the co-ordinates 
for a point. The word SET is on the 'H' key. 
Two numbers, or variables, allow SET to plot 
a point at the co-ordinates given. RESET 
clears these points from the screen. 


THE TWO MODES 
Before we go on to use SET to produce some 


very interesting displays, you might Like to 
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try the following two programs which make it 
extremely clear how the two modes differ оп 
the VZ300. 


As you can see from the Listings, the first 
one, for mode О, uses PRINT@ to position the 
coloured blobs, while the second program 
uses SET. 


40 REM TEXT RESOLUTION 

20 COLOR,1:CLS:PRINT:PRINT 

30 INPUT "WHAT'S YOUR NAME";N$ 

40 CLS 

50 COLOR RND(8) 

60 PRINT e(RND(512)) ,CHR$(141) ;N$;CHR$(442) 
70 SOUND RND(31),1 

80 GOTO 50 


10 REM HIGH RESOLUTION 

CLS | 

INPUT "WHICH BACKGROUND (0 OR 1)";В 
IF В<0 OR ВУ THEN 30 

MODE(1) 

во COLOR RND(8),B 

70 SET (RND(127) ,RND(63)) 

80 GOTO 60 


ЭСЕ 


SPIROGRAPH PATTERNS 


Spirograph patterns are formed by both the 


interior and exterior epicycloid curves (no, 


I don't know what that means, either, but it 
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says so іп my encyclopedia). One of the 
formulae for such a curve is given in Line 
100 of the following program, in which A is 
the radius of a Large circle, B is the 
radius of a smaller circle, and H is a point 
on the circumference of the smaller circle. 


The program choses A, B and C at random, 
then traces out the shape on the screen. The 
finished pattern is held for a moment, then 
the process begins again. This program shows 
clearly how effectively the SET command can 
be used and produces pictures which are 
worthy of close examination. 
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If you don't Like a particular pattern which 
is forming, or you can't see опе at all, 
which will happen rarely with some colour 
combinations, just press any key and a new 
Gesign will begin. Some of the results of 
this program аге very, very attractive 
indeed. You'll find the patterns Look best 
if viewed from a slight distance. 


Here's the SPIROGRAPH program Listing, so 
you can get those epicycloid curves to do 
their thing: 


10 REM SPIROGRAPH 

15 PI-3.141592 

20 МООЕ(1) 

25 COLOR INT(RND(0]*3]«42 

30 IF INKEY$<>"" THEN 30 

40 A-RND(15] 

50 B-RND(15] 

60 H-RND(15) 

70 FOR J-0 TO 3*PI/4.7 

80 FOR 0-0 TO 2*PI STEP Р1/60 

90 X-(A-B)*COS(Q)--H*COS( (А-В) *Q/B«J) 
95 IF INKEY$<>"" THEN RUN 

100 Y-(A-B) *SIN(Q) -H*SIN( (A-B) *0/В+/) 
110 SET((60«X) , (32+Ү)) 

190 NEXT Q 

130 NEXT J 

140 FOR T-1 TO 1000:МЕХТ T 

150 RUN 
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LISSAJOUS FIGURES 


Jules Antoin Lissajou, a French physicist 
who Lived from 1822 to 1880, made a study of 
the movement of particles under the action 
of periodic motions acting at right angles 
to each other (at Least that sounds a Little 
simpler than those epicycloid curves). Jules 


discovered that bodies moving in this way 
trace intricate patterns as they dance 
around each other. 

As in the SPIROGRAPH program we've just 


Looked at, SET is used to plot the points on 
the screen, tracing out the path of the sum 
of the periodic motions. 


Неге are some examples of the effects the 
program can produce. Of course, they are far 
more attractive and dynamic in colour on the 
screen than the dull old black and white 
printouts here suggest. 
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э п в a 50 INPUT "X FREQUENCY" sx 
aut o^ Hs s e 80 MODE (1) 
и ааа Gr еы | 82 Z=INT(RND(0)*3)+2 
r ae ^ | 85 COLOR (2) 
4 „8. E = | 90 FOR А-0 TO 2*PI STEP PI/S 
тни ANT | 100 SET ([20*SIN(A*Y)+80) , (20*COS(A*X]430]] 
" =. s * sa | 120 FOR Т-1 TO 2000:МЕХТ Т 
ы | 
: = = 130 RUN 
“a m^ Tom z” | 
а. s 8. E Try the following sample values with this 
я ш = Zz |^ program: 
z z | j 
1 ^ а” mn" = | | | 
жш” "= = E m H B а ш LES STEP % А 
| 50 | | | 
There are two versions of the program. The 60 2 1 | 
First опе allows you to enter your own 60 3 4 ti 
choice of STEP and X and Y frequencies. 60 5 2 | 
STEPs should be around 50 or more if the ^X £0 1 2.5 
and У frequencies are in Single figures, and | 600 13 26.5 
correspondingly more as the size of the f 300 7 4 
frequency is increased. The higher the STEP | 175 9 4 
number, the greater the resolution of іһер 500 13 6 
final figure. Е 500 4 12 
; ; | 200 8 1 
For a start, enter this program into your | 250 5 6 
VZ300: F 500 20 8 
500 15 20 
10 REM LISSAJOUS FIGURES 
20 PI-3.141592 
25 CLS DOING IT AT RANDOM 
30 INPUT "STEPS"; S 
34 REM ENTER 0 TO END Е Тһе next program chooses the two frequencies 
95 IF 5-0 THEN END | ШЕ at random, with a number between 1 and 20.- 
40 INPUT "Y FREQUENCY" ; Y | 


The STEP size is fixed at 900, but there is 
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no reason why you should not change that if 
you wish. There is a slight pause at the end 
of each figure, and then the screen clears 
and a new figure begins: 


10 REM AUTO-LISSAJOUS 

20 PI=3.141592 

25 CLS 

30 S=500 

40 Y-RND(20) 

50 X-RND(20) 

80 MODE (1) 

82 Z=INT(RND(0)*3)+2 

85 COLOR (2) 

90 FOR А-0 TO 2*PI STEP PI/S 
100 SET ( (20*SIN(A*Y]460) , (20*COS(A*X] +30) ) 
105 IF INKEY$<>"" THEN 40 
110 NEXT A 

120 FOR T=1 TO 2000:NEXT T 
130 GOTO 40 


The final version of the program is simply a 
modification of the preceding one. Іп this 
version, the screen does not clear between 
each image, so eventually you will end up 
with a very complex overlay of designs: 


10 REM AUTO-LISSAJOUS 
20 РІ-3,141592 
25 MODE(1) 
30 S=500 
40 Y=RND(20) 
50 X-RND(20) 
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82 Z-INT(RND(0)*3)42 

85 COLOR (2) 

90 FOR А-0 ТО 2*PI STEP PI/S 

100 SET ((20*SIN(A*Y)+60) , (20*COS(A*X)--30) ) 
105 IF ІМКЕҮ$<>"" THEN 40 

110 NEXT A 

120 FOR Т=1 TO 2000:NEXT Т 

130 GOTO 40 


WEAVING MARTIAN LACE 


Ав you know, the SET command is used to 
place dots of colour on the screen at 
positions specified by the numbers which 
follow the command. 


БЕТ(Х,Ү) places a pixel at Location X (which 
can be zero to 127, the distance across the 
screen from Left to right) and Location Y (а 
number from zero to 63, being the count down 
the screen). 


Our next program, MARTIAN LACE, uses SET to 
produce a balanced, and highly attractive, 
design on the screen. As you'll see when you 
run it, the design continues to unfold for 
as long as you watch it: 


10 REM MARTIAN LACE 
20 MODE(1) 

30 X=RND (63) 

40 Y=RND(31) 

50 Z-RND(4) 

60 COLOR(Z) 
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70 5ЕТ(Х,Ү) 

80 5ЕТ(128-Х,Ү) 

90 5ЕТ(128-Х,64-Ү) 
100 5ЕТ(Х,64-Ү) 
410 GOTO 30 


THE MOTION PICTURE MAN 


You can use the computer as a kind of 'etch- 
a-sketch' toy in mode 1. You enter a number 
(2, 3 or 4) to select the colour you want, 
then use the arrowed keys to draw designs of 
your choice on the screen. The image begins 
in the top Left hand corner of the screen. 


10 REM MODE 1 SKETCHER 

20 CLS:INPUT A 

30 MODE(1) 

40 COLOR A 

50 X=0:Y=0 

60 REM — DRAW PICTURE — 

70 С%-ІМКЕҮ% 

80 IF C$="," AND X<127 THEN X=X+1 
90 IF C$="M" AND ХЮ THEN Х=Х-1 
100 ТЕ С%-"," AND Y>O THEN YzY-4 
110 ТЕ C$=" " AND Ү<63 THEN YzY44 
120 SET(X,Y) 

130 IF C$="C" THEN COPY 

140 IF C$="R" THEN RUN 

150 IF C$="N" THEN 50 

160 IF C$="E" THEN 190 

170 IF C$="S" THEN END 

180 GOTO 70 

190 GOTO 190 
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As well as responding to the arrow keys, the 
program accepts, and acts on, the following 
commands: 


С - Copies pictures created to some 
printers (Such as the Seikosha GP-100 
on GP-100A) 

R - липа the program again {лот the 
beginning 


М - moves the cursor back to the start 
position 


E - флеегев the picture 

S - Stops the program 
That brings us to the end of this chapter on 
using the graphics. You're sure to Бе work 


on the ideas given here to exploit the 
graphics potential of your VZ to the full. 
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Chapter Thirteen — Animation 


There is little doubt that moving graphics 
games, such as the ones you see in arcades, 
are among the most exciting things you can 
run оп а computer. Although the programs we 
select in this section of the book are in no 
way as sophisticated ав arcade games, 
techniques given will allow you to write 
moving graphics games of your own, and will 
give you some insight into arcade-standard 
programs. So even if you're a bit short of 
cash at the moment to buy software, you can 
use the material from this chapter to.,occupy 
yourself while you save up. Pm 
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Animation 


THE SECRET OF ANIMATION 


It is simple to make something appear to 
move on the VZ screen. You put a shape, 
such as the Letter "A", on the screen in a 
particular spot, and wait a moment or two. 
Then you print a blank space where the PAS 
was, and at the same time, print a new "А" а 
short distance away from its original 
position. The eye will be fooled into 
thinking the A has moved from the first 
position to the second. 


This process is repeated over and over 
again, and it creates the impression that 
the object is moving. That's all there is to 
it. Put one moving object under your 
control, and another one under the VZ300's 
control, and you have the raw ingredients of 
a game. Let's see how it works in practice. 


USING PRINT@ 


As you know, іп the text mode the VZ's 
screen is 32 characters across, and 16 Lines 
down. The PRINT@ command works by counting 
the very first position on the screen (the 
one in the top, Left hand corner) as number 
0. It counts across the line, then gets to 
position 31 at the right hand end of the 
Line. Position 32 is the first one at the 
Left hand end of the second Line. This goes 
right through the screen, with the final 
position, in the bottom right hand corner, 
as position number 511. 
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We'll start by putting something оп the 
Screen. Enter our next brief program and run 
it. When you see the question mark appear, 
enter two numbers separated by a comma. The 
first is the number of Lines down уои want 
the object to appear, and the second is the 
number of spaces you want the object to be 
across the screen. The first number must be 
between O and 15 and the second number 
between O and 31. 


Enter the progran, 
return to the book: 


run it for a while, 


10 REM PRINT @ DEMO 

20 CLS 

30 INPUT A,B 

40 PRINT 6(32*A«B) ,"А" 
50 PRINT 60," п 
60 PRINT 60,; 

70 GOTO 30 


Note the 
which 


use of the formula in 
changes 


Line 40, 
the numbers which һауе been 


entered as down and across co-ordinates into 


a single number which the PRINTG command can 
use. In the next chapter, 
similar formula for PEEK and POKE, but we'll 
Stick with PRINT@ for the time being. 


You'lL find you're using the formula 
PRINTe(32*A-B), or a similar one to it, time 
and again in programs, 
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FOLLOW THE BOUNCING BALL 


We'll now use PRINT@, and our formula, to 
create a bouncing ball program. NEW the VZ 
to get rid of the program which is now in 





it, and enter the following then 


program, 
return to the book for a discussion on it. 


You'll find the techniques that are used for 
this ball can be used іп many, 
moving graphics games which you write. 
So it is worth taking the trouble at this 
point to understand exactly how it works, 50. 
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you can 
programs. 


apply the techniques to your own 


10 REM BOUNCING BALL 4 
15 CLS 

20 A-6:B-11 

30 Ү=1 :Х=1 

40 EA-A:EB-B 

60 PRINT 6 (32*B+A),"0" 
70 B=B+X 

80 А=А+Ү 

90 IF A<2 THEN Ү--Ү 
100 IF A»30 THEN Ү--Ү 
110 IF B<2 THEN Х--Х 
120 IF B»14 THEN Х--Х 
130 GOTO 40 


When уои run ball 


this, you'll see the 
appear on the screen, bouncing 
sides, and Leaving a trail behind it. I 


deliberately did not erase the 'old' ball in 


this program, so you could see that it 
really was just a series of the same char- 
acter being printed at different positions 


on the screen. 
Now, add this Line and see what happens: 


195 PRINT e(32*EB + EA), "," 


When 


128 


you run the program again, you'll see 


from the | 





Animation 


something Like this on the screen: 


As you can see, it leaves a trail of dots 
showing where the ball has been. Remove the 
dot from between the quote marks іп Line 


125, and гип the program again, to see a 


true bouncing ball. 


This program gives a very good impression of 
a moving object. As I said earlier, this 


simple bouncing ball demonstration shows a 
number of key things about moving graphics 
programs, so ме! 11 go through the program 


Line by Line, explaining what each Line is 


doing. 


15 - clears the screen 


20 — sets the start position of the 


ball, 
at 7 across and 12 down e 
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30 - sets X and Y which control the 


40 - 


60 - 


70 - 


80 - 


90 - 


100 - 


110 - 


130 


the ball is too close to the 


change 
in position of the ball between each 


movement 


Sets two variables used to erase the 
old position. These are called EA (for 
"erase А!) and EB (for ‘erase B'). 
It's not a bad idea to use variable 
names which suggest the job 
variable is doing in the program, as 
it makes it much simpler Later on when 
you're going through the program, to 
keep track of what each bit of it 
does. 
and EB are set equal to A and B 
before the ball is printed at 

(Line 60) and before A 
modified (Lines 70 and 80) 


32*B+A 
and В 


this prints the ball on the screen 
В (the down position) is changed 
A (the across position) is changed 


this checks that the A position is not 
too far to the left, апа if it is, 
changes Y to minus Y, which causes the 
ball, next time it comes to this Line, 
to reverse its direction, so it 
appears to bounce 


does the same for the right hand side 


checks the up/down position, and if 


бор of 


the | 


Note, and this is important, EA 
just 


are 
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the 
which, 
to bounce 
screen 


screen, changes X to minus X 
as you'd guess, causes the ball 
down from the top of the 


120 - does the same for the bottom of the 


screen 
125 - prints a blank оп the ‘old! 
of the ball (that is, the 
designated by A and В before 
modified by Lines 70 and 80) 


position 
position 
they were 


130 - sends action back to Line 40, where EA 
and EB are set equal to the ball's new 
position, before it is reprinted in 


the new position with Line 60 


Although this explanation is fairly Long, 
and much Longer than the program it is 
explaining, it is worth reading through it 


carefully. Once you understand it, you'll be 
well on the way to writing your own 
programs. 

Now modify the program so it is а5 follows. 
In this version, there is a Little object at 
the bottom of the screen which is your "Баб! 
and you have to get the ball to bounce off 
it to keep the ball moving. 

You use the 'Z' key to move left, апа the 


ІМ! key to move the bat at the bottom of the 


Screen to the right: 
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10 REM BOUNCING BALL 2 

15 CLS 

20 А=6:В=11:Е=1 1 

30 Y=1:X=1 

40 ЕА-А:ЕВ-В 

50 PRINT @(445+F)," "sCHR$(131);" 
60 PRINT e (32*B+A),"0" 

70 B=B+X 

80 A=A+Y 

Во А$=ІМКЕҮ $ 

85 IF A$="Z" AND Е53 THEN F=F-2 

86 IF А$="М" AND F<29 THEN F=F+2 

90 ТЕ Аха THEN Y=-Y 

100 IF A>30 THEN Ү=-Ү 

110 ТЕ В<2 THEN Х--Х 

120 IF В>12 AND ABS(F-A)«3 THEN Х--Х 
121 IF B=16 THEN END 

125 PRINT @(32*EB + ЕА);" " 

130 GOTO 40 


Now, this is not a particularly satisfying 
game (it probably doesn't even deserve the 
title 'game'], but it shows some extra 
ingredients you'll probably be using 
yourself in moving graphics games. Іп this 
program, outside interaction is brought into 
play for the first time (you moving the bat) 
and the computer responds to this (keeping 
the game underway if the bat is in the right 
position). 


Here's what the extra Lines do: 


e0- F is the position of the bat across 
the screen 
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90 - this prints the 'bat'. If you prefer, 
instead of using CHR$(131), you сап 
use the graphics character available 
directly from the "Ү! key (using 
SHIFT). Note that there must be two 
blank spaces within the quote marks on 
both sides of the character, to  'un- 
print' the bat as it moves 


80 - this read the keyboard, with  INKEYS, 
and sets the result of this reading 
equal to A$ 


85 - if A$ equals "Z" (that is, if you аге 
pressing the "Z" key) and F is greater 
than 3, the value of F is reduced by 
2. Ав F controls the position of the 
bat across the screen, reducing F 
moves it to the Left 


120 - if B is greater than 13 (which means 
the ball is near the bottom of the 
screen), the position of the bat is 
checked, and if it is close to the 
ball, a bounce occurs, and the game 
continues 


121 - if the ball has missed the bat, this 
Line halts the program 

This is not, as I said, a very inspiring or 

challenging game, but with а few minor 


changes can be given a bit of value. Modify 
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it so that it reads а5 follows, and play 
with it a bit: 


10 REM BOUNCING BALL 3 
12 REM 'SQUASH' 
15 CLS 

17 PRINT @ 227," 
18 FOR J=256 TO 416 STEP 32 

19 PRINT QJ," > <": NEXT 

20 A=6:B=11:F=11 

25 SC-4 | 

30 Yz1:X-21 

40 ЕА-А:ЕВ-В 

50 PRINT e[4454F]," "sCHR$(131);" " 

60 PRINT e (32*B4A) ,"Ч" 

70 B=B+X 

80 A=A+Y 

82 А$=ІМКЕҮ$ 

85 IF A$="Z" AND F>8 THEN F-F-2 

86 IF A$="M" AND F<24 THEN F=F+2 

90 IF A<7 THEN Ү--Ү 

100 IF A>17 THEN Ү--Ү 

110 IF B<S THEN Х--Х 

120 IF B=13 AND ABS(F-A]«3 THEN Х--Х 

121 IF B=15 THEN ЕМ) 

122 IF B-13 THEN SC=SC+367:PRINT @68,"SCORE IS ";SC 
125 PRINT e(32*EB + EA)," " 

130 GOTO 40 





Again you'll have to use the 'Z' апа “М: 
keys, but this time you have a smaller 
‘playing field', and there is a bit more of 
a challenge to the game. You might Like to 
spend some time playing with this program, 
modifying it aS you see тт, before 
returning to the book to discuss moving ап 
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object up and down, as well as to the right 
and Left, on the screen. 


TRAPPER 


We now have a program which is somewhat more 
difficult - апа enjoyable - to play, in 
which ап 'X' is stalked by the prehistoric 
18! symbol. Stirring stuff. 






ад 48 , 
4 „ке 
SO $ 





сода 


А 


In this program, you are the 'X' and the 
VZ300 controls the  'G', You use the 
following keys to move yourself around the 
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screen, trying to stay out of the VZ's There is no need to go through this program 


clutches for as (опа as possible: Line by Line, as I'm sure that by now you 
| have а pretty good idea of what effect the 
A — to move up | various parts of the program have. 
ds be сап Th in diff bet TRAPPER d th 
M — to move Left (see arrow on thi RE ee ee Бі ш 
томы үт BOUNCING BALL series of programs is that we 
, — to move right (see arrow) are now moving the object under our control 
in two dimensions, and that the thing which 
is trying to trap us, can 'sense' (using 
Lines 135 to 170) just where we are. The 
10 REM TRAPP 
p 2 Lines 135, 145 and 155 are just to give you 
20 Er DE | a chance. Take them out, апа you'Ll be dead 
30 TH=20:TV=14 | within ten moves, every single time. 
_ 40 EA-BA:ED-BD 
50 EH-TH:EV-TV | This program points up one of the 
60 PRINT 6 (32*ED+EA)," " disadvantages of working in BASIC, 
70 PRINT е (32*TV4TH)," " | especially with PRINT@. It is fairly slow, 
80 AS-INKEYS and everything we add to a program slows it 
90 IF A$-"A" AND BD»2 THEN BD-BD-4 down further. 


100 IF A$="Z" АМ) BD<14 THEN BD-BD41 


110 IF A$-"," AND BA«30 THEN BA-BA«4 Fortunately, there is another way to move 


190 IF А$="М" AND BA>2 THEN BA-BA-4 | tnings on the screen, using PEEK and POKE. 
130 PRINT е (32*BD4BA) , "x" | We'll be Looking at those in the next 
chapter. 


135 IF RND(2}=2 THEN 150 

140 IF ВО>Ту THEN TV-TV44 

145 IF RND(2)=2 THEN 160 

150 IF BDXTV THEN TV-TV-4 

155 IF RND(2)=2 THEN 170 

160 IF BAXTH THEN TH-TH-4 

170 IF BA?TH THEN ТН-ТН-4 

180 PRINT e (32*TV+TH) ,"е" 
185 T=T+1 

190 PRINT 6 0,"ТІМЕ ELAPSED''T 
210 IF BD-TV AND BA-TH THEN SOUND RND(20],1:GO0TO 210 
220 GOTO 40 


136 137 





Y Е “> осна peat hie 23 Ё 8 жүт жеу ыл «даланы, a £ 
> 3 z = E - - 
чарлы, SES RE = NEUE слой; ғысқа ne B II ED EE 
mq OA EM осы foo : : ә 
отат Б с т 


жазалы лет ұс eie 


<r 


rr nog ih weet wn ыт ey ee бо 
ж. € 
B Rep a oa pre yt peir ер 





Pett паты С DPE он с с 


25-272. 


--— T — > 


NE a cr PEE 
.- Є t£ wee we LÀ ae An 
- = -- 


Be ne Yee ae SNR 
ө Sify st tate anl ч E aa 
SS ee 


-—- A 
Na € 


PDAS 8 


| 
i 
| 
E. 
| 
| 
{| 
$ 
Ё 
bt 
| 
ah 


——-— 


Chapter Fourteen — PEEK and POKE 


PEEK and POKE are weird words. Unlike GOTO, 
PRINT and IF/THEN, they are not the sort of 


words which immediately suggest what they're 
used for. 


In fact, PEEK and POKE seem to inspire more 
fear and confusion in programs when they 
first come across them than any other words 
in BASIC. There is no need to worry. They 


are simple to use, and their use follows the 
ways we used PRINT@ in chapter 13. 


Although they can be used in programs in 
place of PRINT@, PEEK and POKE are not just 








PEEK and POKE 


Strange-sounding substitutions for them. 
There are two advantages in using them. 
Firstly, POKE is faster than PRINT@. 
Secondly, PEEK can be used to find out what 
is on the screen at a particular position. 
This is ideal for discovering whether or not 
an alien has been shot, or the plane you are 
Flying has hit the side of a mountain. 


When you POKE something onto the screen, you 
put it there. When you PEEK the screen, you 
are Looking to see what is on the screen at 
that particular position. And that's just 
about all you have to remember. 


If you have two co-ordinates of a position, 
such as A (for 'across') and D (for ' down), 
you PRINT@ then, ав explained іп the 
previous chapter, using the formula 
PRINT@(32*D+A). To POKE something onto the 
Screen, you use a Line which is related to 
it, as follows: 


POKE 28672+32*D + A, X 


I generally use 28872, the Location of the 
top Left hand corner of the screen, ог 
08736, the position two Lines below it. The 
X is the character number, and this is the 
character which will appear when we POKE 
directly to the screen. 
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You'll remember that, when working with 
PRINT@, we used a space (" ") to wipe 
something off the screen. The POKE 
equivalent to this is 32, so... 


POKE 28672 + 32*D + А, зар 
...15 equivalent to... 


PRINT 6 (32*D + A)," " 


If you want to find out what is at a 
particular address (the Locations on the 
screen are called 'addresses'), you use PEEK 
as follows: 


IF РЕЕК «(28672 4:39*D- А) -.:.:;-THEN-... 


Now, PEEK and POKE are Simpler to use than 
they may appear at first sight. I Suggest 
you enter the following programs, which use 
the two commands, апа follow through the 
Listings carefully. This will allow you to 
Learn about the use of the two words more 
quickly than any other way. 


MESOZOIC ATTACK 


The Mesozoic Era was the time when fierce 
dinosoars, Like the Dickus Smithus 
Electronicus, roamed the earth. Our program, 
MESOZOIC ATTACK, is really а РЕЕК/РОКЕ 
version of TRAPPER. Only POKE is used in 
this program, to introduce you to the пем 
words in a gentle way. 
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The control Кеу5 are the same as in TRAPPER, 
with 'A' and 'Z' to move you up and down, 
and the arrow keys 'M! and ',' to move you 
left and right. 


10 REM MESOZOIC ATTACK 

15 HS=0 

20 COLOR ,0:CLS 

30 SC=0 

40 HA-1:HD-4:D-15:A-30 

50 EA-HA:ED-HD 

60 IF INKEY$="A" THEN HA=HA—1 
70 IF INKEY$-"Z" THEN НА=НА+1 
80 IF INKEY$-"," THEN HD=HD+14 
90 IF INKEY$="M" THEN HD-HD-4 
91 IF НА<1 THEN HA=1 

92 IF HA»14 THEN HA=14 

93 IF HDX1 THEN HD=4 

94 IF HD»31 THEN HD-34 

95 EB-SB 

100 SB=28672 + 32*D4A 

110 IF SB-H THEN 1000 

115 POKE EB,143 

180 POKE SB, (36-RND (2) ] 

130 H=28672 + 32*HA+HD 

140 IF SB=H THEN 1000 

145 POKE EH,143 

150 POKE H,88:EH=H 

160 IF D<HA THEN D-D44 

165 IF RND(S)»3 THEN 180 

170 ТЕ D>HA THEN D-D-4 

175 IF RND(S)>3 THEN 190 

180 IF A<HD THEN A=A+4 

190 IF A>HD THEN A-A-4 
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200 SC=SC+4 

210 PRINT @ 20,"TIME>"SC 

240 IF D«1 THEN 0=1 

250 IF D»14 THEN D=14 

260 IF A«1 THEN А=1 

270 IF A»31 THEN A-31 

275 IF SB-H THEN 1000 

e80 GOTO 50 

1000 POKE SB,143:POKE H,143 

1001 POKE EB,143:POKE EH,143 

1002 FOR J-1 TO 19 

1003 POKE SB, (80+RND(19)} 

1005 PRINT @ 453,"I GOT YOu!!!" 
1010 SOUND RND(20)+1,1 

1020 NEXT J 

1030 PRINT @226,"YOU SURVIVED FOR"SC 
1035 IF SC>HS THEN HS-SC 

1040 PRINT @258,"BEST SO FAR IS"HS 
1050 FOR T=1 TO 500:NEXT T 

1060 GOTO 20 


And from the distant past, we move to the 
far distant future with our next program, 
which uses PEEK to 'read' the screen. 


V-WING SPACE BATTLE 


In this program, you pilot your little V- 
wing space craft around the VZ screen, 
trying to run over the numbers which appear 
on it. Each number will appear for a Limited 
amount of time, and if you run over it, a 
score related to that number will be added 


to your growing tally. 


PEEK is used here, for the first time in one 
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of our 
at the 


PEEK and POKE 


programs, in Line 190, where it Looks 
position where your space craft 


is 





about to be POKEd, 


there, 


increments your score. 


10 REM V-WING SPACE BATTLE 
20 CLS 
30 SC-0 


and if it finds a number 
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100 FOR Z-1 TO 20 

101 COLOR,O 

110 SL=28736 :M=22:D=-32 

120 POKE (28715+RND(467)),(RND(9)+48) 

130 W=SL 

140 А$=ІМКЕҮ$ 

150 IF A$z"," THEN SL=SL+1 :M=62 

160 IF А%-"М" THEN SL-SL-1:M-60 

170 IF А%-"А" AND SL>28736 THEN SL-SL-32:M-4 
180 IF A$="Z" AND SL<29151 THEN SL-SL432:M-—22 
190 Q-PEEK(SL) 

200 IF 0>48 AND 0<58 THEN SC=SC+Q:GOTO 980 
205 POKE W,143 : 

210 POKE SL,M 

220 IF RND(O)}<.99 THEN 130 

230 COLOR,1:FOR T=1 ТО 20:МЕХТ T:COLOR,O 
980 CLS:PRINT 6 D,"SCORE ";5С;" "$20-Z;" SHIPS LEFT" 
982 COLOR,INT(RND(0)*2] 

985 SOUND RND(25],1:1F RND(10)>6 THEN 982 
990 COLOR,O:NEXT Z 

995 CLS:PRINT:PRINT:PRINT 

1000 PRINT "THE BATTLE IS OVER ~ 

1003 PRINT:PRINT 

1005 PRINT "YOUR SCORE IS"SC 

1100 COLOR, INT(RND(0)*2) 

1120 SOUND RND(25),1:GOTO 1100 


You can see from how the screen is 'read' in 
Line 190, and the use which is made of that 
information in Line 200 (which adds to your 
score, then ends action to Line 80 to 
prepare the next 'target'), how PEEK сап 
greatly simplify your programs where you 
must discover if two objects have collided. 


You should also be pleased to discover that 
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PEEK is much faster than checking co- 
ordinates (IF A=Z AND B=K ТНЕМ...). This 
increased speed, of course, makes for a much 
more satisfying game. 


Here is a grid, showing the positions on the 
POKE screen: 


















Finally in this chapter, here аге the 


character code numbers for use with PEEK and 
POKE: 


0-6 T ema eB d — С 

4 - D oe oe yo — 

S.-H Bo СЕ 261 -—-J и ве 

Ке оо E TS —M 14 - N 15---8 

TO —-P ту ee 18 “И TO = 9 
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Chapter Fifteen — Structured Programming 


There will come a point in your development 
as а programmer when you'll have mastered 
the use of much of the use of BASIC on the 
VZ300, and can now concentrate on writing 
better programs; programs which work after 
relatively Little debugging, which are easy 
for others to understand and operate, апа 
which are written Logically and elegantly. 


Your programs will be more Likely to run 
first time if they are planned out carefully 


before you start actually programming into 
the VZ300. 
CD = 
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A good way to start is to use a diagram 
which is often called a 'flow chart'. A flow 
chart is a series of boxes and other shapes, 
Joined by Lines, which show the flow of 
action and decision-making within the 
computer while the program is running. 


The shapes used are not too important, and I 
suggest you stick to just two: a rectangle 
for most actions the computer must carry 
out, with а diamond shape each time the 


computer has to make а decision. The 
corners of the diamond can be used - as you 
can see in the diagram - to cater for the 


alternatives facing the computer. 


The diagram shows the flow chart of a 
Program which sets the variable X equal to 
zero, then adds one to it. The value of X is 
checked. If X is found to be less than 20, 
the program goes back to add one to X again. 
This continues until the value of X becomes 
equal to 20. 


END <— NO 
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One advantage of using a flow chart 15 that 
you do not get Locked, at an early stage of 
your work, into the peculiarities of  VZ300 
BASIC, its weaknesses and Strengths, which 
you are using. Instead, you concentrate on 
what you want to do. Of course, you may have 
to modify your plans Slightly to accept 
Limitations dictated by your programming 
Language, whatever it may be, but you do not 
have to bend to these Limitations (which may 
be, in part, imaginary) at the start of the 
process, 


A flow chart is 'universal'. The same flow 
chart can be used as the basis of a program 
written on some other computer which is 
furnished with а completely different 
Language from that which is on the ү7300. 


А flow chart models the flow of action апа 
Logic within a Program, апа 15 therefore 
very useful for picking up potential bugs at 
the earliest stages. You may, for example, 
find that one condition for the program will 
test will never be fulfilled, possibly 
Leading to the program being trapped іп ап 
infinite Loop. Other parts of the code may 
be bypassed completely, because the 
condition which triggers entry into that 
part of the code will never be met. 


Once you've devised a flow chart for your 
Program, and you've run through it mentally 
a few times, so that the most obvious bugs 
are removed, you should reduce the flow 
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chart to а series of Subroutine calls. 
Although it seems pretty silly to do this 
for а simple program Like our "SET X EQUAL 
TO ZERO, ADD ONE, CHECK IF LESS THAN 20" 
program, this method comes into its own with 
more complex programs. 


PROGRAMMING IN MODULES 


I think it's a good idea to Start a long and 
complex У7300 program with a series of sub- 
routine calls, with each action of the 
Program being Looked after by a separate 
Subroutine. Then, if the steps within а 


vs олку, „ќе 
“Же уба tary 
TOAD е TORO ASL 
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~ СА A eee 
129444 е, Y 
522005555099 
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Program have to be performed several times 
їп а particular sequence, the series of 
Subroutine calls can be cycled through - 
Over and over again - until а particular 
condition is met which signals the end of 
the run. 


You'll recognize how useful this approach to 
programming can be when you get to the 
debugging stage of your program. If there is 
a bug, it is likely to be within a single 
subroutine, so it will be relatively easy to 
pin down the subroutine which contains the 
bug, rather than having to work right 
through the program trying to track it down. 


Working with subroutine 'modules' in this 
way allows you to test sections of the 
program in isolation, even before the entire 
program is finished. I'LL try to make this 
statement clear by showing you the first 
part of a typical program to play Draughts 
on the VZS300. Our ideal Draughts program 
could start Like this: 


10 REM VZ300 DRAUGHTS 
20 GOSUB 9000: REM INITIALISE VARIABLES 
30 GOSUB $000: REM PRINT BOARD 
40 GOSUB 7000: REM ACCEPT PLAVER MOVE 
50 GOSUB 8000: REM PRINT BOARD 
60 GOSUB 5000: REM COMPUTER MAKES MOVE 
70 IF (human has not шоп) AND (VZ300 

has not won) THEN 30 
§0 IF (VZ300 has won) THEN PRINT "І ИТМ” 
90 IF (human has won) THEN PRINT "VOU WIN" 
100 END 

151 











Programming the VZ300 


You could quite a bit of this Program 
running, and tested (such as the 
initialisation routine, printing the board 
and accepting the player's move), before you 
even turned your attention to how on earth 
you were going to get the VZ300 to make its 
move. 


You would then know - for example — that you 
would not need to waste any extra thought on 
whether or not ап error in the board- 
printing routine was the cause of odd 
output. Having tested the board subroutine 
and the player move routine, you'd know that 
the error must be in the subroutine between 
Lines 5000 and 6999, the subroutine in which 
the computer makes its move. 


ALL you need to do is put a single PRINT 
statement, such as "THIS IS VZ300 MAKING A 
MOVE" followed by a RETURN for incomplete 
subroutines, knowing that the Program will 
accept that, and demonstrate the direction 
the program flow is Following, even if whole 
Sections of code have not yet been written. 


In general, I'd advise you to use this 
System of using a 'master Loop! of 
Subroutine calls within which you will 
"hold' the entire Program. 


I suggest you try and do as much writing of 
the program as Possible before you turn the 
computer оп, even though there is a great 
temptation to dive Straight onto the VZ and 
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Start punching in code. You'll find that 
the discipline of writing it out by hand in 
advance will serve you in good stead and 
should, іп the Long run, produce a better 
program than might otherwise have been the 
case. 


Overall, you'll probably end up spending up 
Less time on the Program working in this way 
than you would if you began the process 
Sitting at the VZ300 keyboard. 


It took me a while to Learn this Lesson. 
Although I had read suggestions along the 
Lines of 'work out exactly what you're going 
to enter before you start at the computer' 
in several books, I tended to just jump 
right in without much prior thought. 


Although I worked out rough flow charts, and 
had an idea what sort of display 
organisation I wanted, I certainly did not 
write much program out on paper before 
starting at the computer. Then, I once found 
myself stuck for a two-week period without a 
computer and ideas for severaL programs just 
itching to be written. I had to write them 
out in an exercise book. 


The relative ease with which the programs 
were debugged when they were eventually 
entered into the computer, and the 
complexity of the Programs I wrote in this 
way (including my first Chess program) 
convinced me that this was the way I would 
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work from then on. It is amazing how much 
cleaner a program can be if all the rough 
working out is done on paper, rather than on 
the computer screen. 


When working on Programs which threaten to 
be big and involved, I tend to write the 
major 'call subroutines Loop! first of all, 
but without Line numbers, so the program 
contains Lines Like GOSUB PRINT BOARD and 
GOSUB INITIALISE. Next, I write each module 
(or subroutine) on а Separate sheet of 
paper. Then, when the major subroutines have 
been written I shuffle them into ап order 
which seems most Logical. 


All this, of course, occurs before any Line 
numbers are written in. The subroutine 
modules are put in an order which ensures 
that the program structure is as logical as 
Possible. I use arrows to indicate the 
destination of GOTO's within a module, and 
names for subroutine, as Suggestion in the 
major Loop. Later on, when the Program has 
Started to assume a firm shape, the Lines 
are numbered (I usually work іп tens, 
starting at Line 10) and the relevant GOTO 
and GOSUB destinations are added. 


ALL programs have ап 'end condition’! at 
which point computation stops. It is worth 
putting a test for this end condition as 
part of the GOTO which sends the program 
back to start cycling through the major 
Subroutine Loop. This ensures that the cycle 
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will continue until a Particular condition 
is met, at which point the Program ‘falls 
through' that GOTO and continues on to the 
Lines which signal the end of the program. 


INPUT PROMPTS 


It is very useful, when writing a program, 
to keep in mind how the program will appear 
to a stranger when it is run by him or her 
for the first time. If there is an input 
prompt required, it is far more useful if 
the program prints up something Like "HOW 
MANY HOURS HAS THE EMPLOYEE WORKED THIS 
WEEK?" instead of just "INSERT HOURS?" or 
the almost useless Lone question mark. 


The same suggestion applies to print output. 
It is far better that your program is 
written so that it prints out THE NUMBER OF 
HOURS WORKED ON FULL PAY THIS WEEK IS ӨЛІ 
rather than HOURS, FULL: 07 ог an 
unsupported 27, Of course, providing 
explicit input prompts and output PRINT 
Statements consumes memory as well as typing 
time when entering the program, but the 
contribution they make to the final program 
means the trouble involved is well worth 1t. 


While exact PRINT statements and input 


prompts will help a person running a program 


make sense of it, REM statements can help 

make the program clear to those who are 

examining the Listing for the first time. 
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REM statements (which are, ав you know, 
ignored by your VZ300 when a program is run) 
should be used to help illuminate the flow 
of Logic within the program, and what is 
happening in certain places within it. This 
is especially important in parts of the 
program where decisions are made, or 
calculations are carried out. 


Not only can REM statements be used to 
explain different parts of the code, but 
they can also be used to provide visual 
"Бгеак5", so that the various blocks of code 
which carry out certain tasks are visually 
separated from the rest of the program. A 
blank REM statement (the word REM standing 
alone in а program Line) can be used for 
this. A row of asterisks is an effective 
alternative. 


VARIABLES 


It is worth considering the use of explicit 
names for variables, using either the word 
in full (such as HOURS as a variable name in 
a payroll program for hours worked) or an 
abbreviated version of this (such ав HR) 
which has a fairly obvious meaning. You'll 


discover that this makes it easy, when 


working on а program, to keep track of your 
variables. This will help you with the 
initial debugging and Later on as well if 
you need to improve or extend the original 
program. 


156 





Structured Programming 


Explicit variable names also help make your 
code more ‘transparent! so other programmers 
can work out what the various parts of the 
program are intended to do. You'll also find 
it a great help to yourself when уои return 
to the program at a Later date. It is 
surprising how code which seemed incredibly 
clear it terms of its purpose when you 
entered it, becomes exceedingly hard to 
follow when you return to it after а long 
break. 


CHECKING INPUT 


Any input entered by the user should be 
checked by the program before it is accepted 
to ensure that incorrect data does not cause 
the program to crash at some future point. 
Whether you want string, or numeric input, 
it is often wise to allow for string input, 
which is first checked to see whether the 
entered material is acceptable and then, if 
necessary, the string can be changed into a 
number. 


For example, if the user needs to enter a 
number between one and nine, a string can be 
accepted and then checked to ensure that it 
is not less than "1" or more than "S" before 
being changed into a number with a command 
Like VAL. 


As well as ensuring that the program will 
reject invalid input, you should check the 
program to see all the inputs which it does 
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accept produce sensible answers when 
processed Later оп in the program. For 
example, make sure that your program does 
not accept zero as a possible number if the 
trusty VZ must Later divide by this number. 


Similarly, if numbers are to be processed by 
a function, and then the result of this 
processing used for division, you must check 
that an apparently valid input does not turn 
into zero as a result of evaluation by the 
function. 


If the information entered by the user is 
rejected, and a new input is requested, the 
Program should ideally point out why the 
Original input was not Suitable, ог spell 
out again exactly what is required (such as 
"ENTER A NUMBER BETWEEN 1 AND 4"). You risk 
making users angry if input which appears 
valid is continually rejected without 
apparent reason. 


DOCUMENTATION 


The written material which accompanies a 
program is often called documentation. If 
you're preparing programs to be used by 
other people, it is very useful for those 
Programs to be supported by some documen- 
tation, however sketchy. 


The written information should explain, of 
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course, what the program does, then go on to 
outline the flow of action within the 
program. Тһе documentation should alert the 
user as to the kind of actions which will be 
required from him or her when running the 
program, and give an indication of the kinds 
of user input and reaction which will be 
accepted. 


The format of the final output should also 
be discussed. A List of variable names can 
be included. 


If there are ways in which the program can 
be developed, extended or improved, 
suggestions along these Lines can Бе added 
to the documentation. Written references to 


any material which will help in 
understanding the algorithms used, or for 
giving suggested areas for program 


development, should also be included. 


Documentation for а major program should 
Start with an introduction which quickly 
explains what is going on, and tells how to 
use the program. The Later parts of the 
documentation can then discuss the program 
in greater detail. It is not good practice 
to force the user to wade through а vast 
amount of information in order to dig out 
the vital facts he or she needs to get the 
program running. 
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Chapter Sixteen — Cassettes and Disks 


It is really rather pointless writing great 
Programs, or typing in programs from books 
Like this one, and then not Saving them on 
cassette or disk before you turn your  VZ300 
Off. If you don't save the program, it is 
Lost when you turn off the Power, апа you 
have to start all over again when you next 
want to use the computer. 
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Cassettes and Disks 


To connect up а cassette player, using 
either your own cassette, or the special one 
for the VZ provided by Dick Smith 
Electronics, use the cords which come with 
your computer. Connect them up as shown in 
the diagram. 


COMPUTER 
BACK OF UNIT 


CASSETTE RECORDER 


iN 
TAPE 





| 
RED 


To save a program on cassette, so you can 
use it again, you have to give the program a 
name. This name сап be from опе to 316 
characters Long, so MYPROG, A4, Z and 
SAUSAGESANDSAUCE are all valid names. The 
important thing is that the file name must 
start with a Letter, rather than a number or 
symbol. 


SAVING A PROGRAM 


You put the cassette in your recorder, make 
sure the tape is past the blank leader 
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portion, then type in on your VZ: 
CSAVE "NAME" 


Of course, you put your own name for the 
program in place of the word NAME. Then, 
Start the cassette player, in record mode, 
and once the tape is rolling, press the 
RETURN key on your VZ. The flashing cursor 
will vanish while the save takes place. Once 
the cursor re-appears, the program has been 
Saved on cassette. It is suggested that you 
Save each program two or three times, just 
to make sure you have a version of it which 
will Load successfully next time. 


VERIFYING A PROGRAM 


To check the program on the tape, before you 
NEW your VZ300, rewind the tape to the 
position it had just before the recording 
began. Type in: 


VERIFY "NAME" 


Then, press the PLAY button оп your 
recorder, and the RETURN key on the VZ. The 
computer will compare the program оп tape 
with the one in your computer's memory, апа 
if they are the same, will print ир the 
message VERIFY OK. This ensures that you 


have an uncorrupted version of the program 
on tape. 
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LOADING A PROGRAM 


То get а program from tape back into your 
VZ300, set the tape up so it is just before 
the start of the program. (To make it easier 
to: do this, you might Like to precede the 
saving of a program with a short voice 
announcement, so you know which program is 
coming next. If you do, make sure you dis- 
connect the microphone before saving the 
program.) 


Then, type in: 
CLOAD "NAME" 


Now press the play button on your recorder 
and the RETURN key on the computer. 


The message WAITING will appear on the 
screen while the computer waits for your 
program on the tape. When it appears, you'll 
see the words FOUND Т: NAME as other 
programs are located. The message LOADING T: 
NAME means the program name you have 
specified has been Located, and 15 now 
Loading into the У7300. 


ATTACHING A DISK DRIVE 


While cassettes have the advantage of being 
very cheap as a means of storing programs, 
they are slow to Load and save, and somewhat 
unreliable. Disks, by contrast, are not so 
cheap, but load virtually instantly, and 
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with close to 100% reliability. If you have a second disk drive, you plug it 
ОРЕ | | |. into the socket marked DRIVE 2, before 
ие е 2 disk drive to © your | turning on the power. 
бөгүн Ку need the floppy disk controller 
теты). vii E memory expansion module Once you do turn on the power, the message 
= ° art by turning the power off оп the screen will read: 

your computer, then sliding the disk | 
controller cartridge into the slot at the VIDEO TECHNOLOGY 
neue of the computer. Next, you plug your DOS BASIC У1.2 

(ог 64K) memory expansion unit into the E 

slot at the top of the disk controller. | READY 


If you do not get this message, turn off 
power to all units, and go through the 
procedure again, making sure you are always 
gentle when sliding parts into each other. 


USING DISKS 


Once you have the system ир and running, you 
can experiment by saving a program. Open the 





Then | disk drive door, by first turning the little 

сов Le enn the шы ааа оп the flat handle upwards to make room for the disk, 

Mock ДЕ: ed with the disk drive into the and after you've inserted the disk, turn the 
er socket marked DRIVE 1, connect | little handle down again. 


the separate power supply to the disk drive 
and then turn on the power to the disk 
drive, and the power to your VZ300. 





---------- 





Em wr ( 23 ami the disk drive door is 
Se ЕЙ OPENED 





| the disk drive door is 
ај | CLOSED 


SN NS < | 
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You need to format a disk before it can be 


used. To do this, get a blank disk, or one 
which you no Longer need (because formatting 


disk drive door 


7 
a 


wipes everything off a disk), апа place it 
in your disk drive. 


Label 


Now type in: 


Cassettes end Disks 


SAVING PROGRAMS TO DISK 


Once you have an initialised disk, you can 
use it to save a program on. 


Whereas with cassettes you used the command 
CSAVE "МАМЕ", you Leave the 'C' off, and 
Simply enter: 


SAVE "NAME" 


The red Light will come оп, the drive will 
make a few sounds for a second ог two, апа 
then the word READY will appear to show you 
the process is complete. Note that, unlike 
when you work with cassettes and files can 
be up to 16 characters long, the file name 
for а disk file cannot be more than eight 
characters Long. 


GETTING THE PROGRAM BACK 


It is very simple to Load іп a program from 
disk. You just type in: 


INIT 
LOAD "МАМЕ" 
This stands for 'initialise'. Once you do | After а few seconds of sound from the drive 
this, and press RETURN, the red Light will as the red Light comes on, the word READY 
come on and you'll be able to hear the disk will appear on the screen to show you that 
spinning around inside the drive. Never, the program has Loaded. If you have only 


ever try to remove a disk from the drive 


: : ever used cassettes you'll be extremely 
when the red Light is on. 


impressed by the incredible speed with which 
disks work. 


Then, to run a program, you just type in. RUN 
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as normal, апа the program will run. If you 


want to avoid this step, then, instead of 
LOAD "NAME" you type in: 


RUN "NAME" 


This will ensure that the program runs auto- 
matically, once it has Loaded. 


WHAT'S ON THE DISK? 


The word DIR (which is short for 'directory' 
is used to discover which programs you have 
on your disk. When I typed in DIR, and then 
pressed RETURN with one of the disks I 
developed when writing this book, I saw the 
following on the screen: 


T: TEMP 

T: TEMP1 
T:GOLF 

T: REACTION 
T: SPIRO 
T:LISSA-1 
T:LISSA-2 
T:MARTIAN | 
T: SKETCH 
T: TRAPPER 
T:MEZOIC 
T: VWING 
T:LIFE 


To find out how much space you have Left on 
your disk, you enter the word STATUS. When I 
did it with my program disk still in place, 
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the following message came up on my Screen: 


STATUS 
537 RECORDS FREE 
67.125K BYTES FREE 


OTHER DISK COMMANDS 


The other two commands you're going to need 
when working with disks are as follows: 


REN 


REN is used to rename a file on disk. To use 
it, you type in: 


REN "OLDNAME", "NEUNAME" 


Then, when you next do а DIR, you'll see 
that the file is not Listed under its 
original name, but now appears іп the 
directory under the new name. 


ERA 


You use this to wipe an unwanted file from 
your disk. As it is impossible to save а 
file of the same name as another one оп the 
disk, you may want to erase an earlier 
version of the program to make room for the 
newer one. To use, just enter: 


ERA "NAME" : 
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Your next DIR will show that the file has 
been wiped. 


TAKING CARE OF DISKS 


There are a few commonsense rules for 
Looking after the disks you use with your 
VZ300 which will ensure you get the maximum 
value out of them. It will also reduce the 
chance of Losing valuable data through 
damage to a disk. 


if anything happens to the disk - such as it 
getting bent or having something spilled on 
the outer cover (апа not into the disk 
itself), repair the damage as best you can, 
and make а copy of the disk immediately. 
Then discard the original disk. 


If you put а contaminated disk іп your 
drive, you гип the risk of damaging the 
read/write head. 


Don't touch the part of the disk which shows 
through the slot in the outer cover, and 
don't put anything (such as cups of coffee, 
ash trays, copies of the Dick Smith cat- 
alogue or other heavy books) on top of 
either the disk, or the cardboard cover. 


THE NASTY MAGNETIC FORCE 


Magnetism can corrupt data on a disk. If you 
have anything which is, or could be, 
magnetised, such as radio speaker, a pair of 
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scissors, ог а telephone handset, keep it 
well away from your disks. 


Disks, as I guessed you've realized by now, 
are pretty sensitive creatures. They don't 
Like heat too much, so leaving them in the 
car while you go surfing is going to cause a 
few problems. Disks work best in the range 
10 to 51 degrees Celsius. If a disk -is 
exposed to temperatures outside this range, 
Leave it for at Least half an hour to adjust 
to room temperature before putting it in the 
disk drive. 


You should never bend disks, or use rubber 
bands, adhesive tape or paper clips on them. 


If you want to write on the cardboard outer 
sleeve, take the disk out first. Write on 
the Label, which you are going to stick оп 
the disk itself, before you stick it in 
place. If you have to add something Later, 
write gently, and with a felt-tipped pen. 
Don't use a biro or sharp pencil. 
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TIM HARTNELL TAKES THE BYTE 
OUT OF PROGRAMMING YOUR VZ300! 


Now you can learn to program your Dick Smith VZ300 Personal 
Colour Computer in a matter of hours. Tim Hartnell leads you step-by- 
step in this complete guide for the first-time programmer (plus there’s 
quite a bit of material for those with previous computer experience). 


You start to program your VZ300 by writing and playing games, so you 
can have fun while you’re learning! 


In Chapter One, you'll take your first steps in programming, and 
discover that you already know a number of words in the BASIC 
programming language. 


By the end of Chapter Three, you'll have run several complete 
programs, and be in full control of the material your VZ300 is printing 
on the screen. 


You go on to roll dice with the VZ’s random number generator; loop 
the loop with FOR/NEXT loops; read, write and compare data; and use 
sound and graphics to enhance your programs. After this, you’ll take 
real control of your VZ300 with programming commands such as PEEK 

and POKE. 


Finally, you'll discover how to create your own moving graphics and 
write animated arcade games! 


This book includes a generous collection of VZ300 game 
and demonstration programs, including MASTERMIND, 
STAR COLONY, REACTION TEST, GOLF, THE 
PHANTOM COMPOSER, SPIROGRAPH, LISSAJOUS 
CURVES, TRAPPER, MESOZOIC ATTACK and V-WING 
SPACE BATTLE. 

Come on in, the programming’s fine! 
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